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ABSTRACT 

The  increasing  demands  upon  large  digital  computing  facilities 
have  necessitated  the  developement  and  use  of  a  system  control 
program  to  provide  for  continuous  automatic  job  processing.,     A 
comparative  study  of  two  current  systems  was   conducted.      The 
first,  CDC  FORTRAN  60,  is  described  and  its  advantages  and  dis- 
advantages are  pointed  out.  This  system  was  modified  by  the  authors 
to  incorporate  a  remote  (  satellite  )  operation  in  a  time  shared  mode 
The  second  system  studied  was  the  CDC  COOP  MONITOR  system. 
This  system,  a  more  complex,  sophisticated  control  system  is  like- 
wise discussed .    Modifications  to  correct  certain  disadvantages  of 
this  system  are  shown,  along  with  the  programming  necessary  to 
provide  for  remote  station  operation  in  the  COOP  MONITOR  environ- 
ment. 

Several  other  programs  which  were  developed  by  the  authors  to 
improve  the  computing  center's  capability  are  documented.    These 
include;    (  1  )    A  graph  plotting  routine  utilizing  CDC  1604/160 
computors  and  a  CDC  165  /  CalComp  Plotter,     (  2  )    A  large  file 
merg  sort  routine,  and    (3)    A  data  display  "Line  Printer"   routine. 

The  authors  wish  to  express  their  appreciation  to  Professor 
Mitchell  L.  Cotton  of  the  U.S.  Naval  Postgraduate  School,  and 
to  the  personnel  of  the  school's  computing  center  for  their  kind 
consideration  during  the  term  of  this  thesis. 
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1.0     INTRODUCTION 

At  present {    the  Naval   Postgraduate   School's   computing 
center  utilizes   approximately   60%  of  its   prime  time   processing 
short,    1   to   15   minute,    "job   shop",    input  programs,,     Practically 
all  of  these  are  of  a   scientific  problem  solving  nature .     Three 
different  compiler/assembler  control   systems  for  processing 
these  programs  are  currently  in  significant  usage .     They  are 
the  Control  Data  Corporation's   "Fortran  60   System",   the 
Naval  Electronics  Laboratory's   "Neliac  Compiler",    and  the 
school's  own  algebraic  assembly  routine,    "Scrap" .     Of  the 
above,    the  Fortran  60   System  is  the  only  system  which 
incorporates  a  full  control,    automatic,    job  sequencing 
"monitor"    system „     Much  more  will  be   said  about  this   "monitor" 
capability  and  the  Fortran  60   System.     The  remaining  40%  of 
the  prime  computing  time  is  utilized  for  class   laboratory 
instruction,   maintenance  and  update  of  systems  library  tapes, 
data  retrieval,    schedule  analysis,    and  other  special  job  users. 

The   non-prime  time,    1630  to  0800,    is   scheduled  block 
time  for  the  various   developement  projects  and  long  run 
programs. 

This  environment  places  increasing  demands  upon  the 
computing  center's  capabilites.     Not  only  is  improved  efficiency 
required  but  also  more  flexibility  is   in  demand  as  the 
programmer's  talents  become  more  and  more   sophisticated . 

Several  tasks  were  undertaken  in  the  scope  of  this  thesis 
project  =     Towards  improving  over-all  system  efficiency,    a 
comparative   study  of  the  present  Fortran  60   System  and  its 
proposed  successor,    "Coop  Monitor/Fortran  62   System",   was 
conducted.     As  a  result,    an  outline  and  a  discussion  of  the 
outstanding  advantages   and  disadvantages  of  each   system  is 
incorporated  in  this  thesis  „ 

Towards  improved  system  flexibility,   two  new  facilities 
were   developed.     They  were  the  implementation  of  an  operational 
remote    (satellite)    computing   station  and  a  system's  provision 
for  automatic  graph  plotting  of  two  dimensional  computer 


derived  arrays  . 

The  full  implementation  of  the  remote   station  complex  is 
a  continuing  group  project  with  much  remaining   to  be   accomplished.. 
As  an  aid  to  those  who  pursue  this  task,    several  recommendations 
are  made  and  suggested  methods  for  solving   some  of  the 
problems  are  expounded. 

Besides   the  work   accomplished  in  establishing  the   satellite 
station,    another  aspect  of  the  center's   services  was  improved. 
This  was  the  provision  of  a  graph  plotting   system.     This 
required  the  developement  of  a  plotting  program  for  both  the 
Fortran  60   System  and  a  much  improved  and  shorter  Grafplot 
program  for  the  Coop  Monitor  System.     The  major  portion  of 
this   project  was  completed  during  the  author's  five  week 
industrial  tour  at  the  Control  Data  Corporation,    Palo  Alto, 
California.     The  off-line  processing  of  this  graph  plotting 
program  was   provided  by  rewriting,   with  many  revisions,    an 
existing  plot  drive  program  initially  developed  by  the  U.S. 
Naval  Fleet  Numerical   Weather  Facility,    Monterey,    California. 
Versions  of  this   program  were  developed  to  operate  on  either 
the   160  or  160A  CDC  computers .     The  plotter  employed  is 
the  CDC  model   165/CALCOMP  incremental  plotter     This   system 
has  proven  very  effective  and  has   enjoyed  considerable  usage . 
Although  this  provided  an  improved  data  output  medium  for 
the  center,    it  has   also  stimulated  an  increased  interest  in 
utilizing  the   Digital  Computer  for  project  studies.     Thus  the 
center's  task  and  effectiveness  is  ever  increasing. 

A  second  method  of  data  display  was  provided  by  utilizing 
a  new  cathode  ray  tube,    Data  Display  model  DD65,    as  an 
"on-line"   line  printer.     Thus  it  is  possible  to  monitor  the 
Fortran  System's  output  listings   concurrently  as  it  is  listed 
upon  the  magnetic  tapes  for  later  off-line  hard  copy  printing . 


This   is   a   small   programmed  package  to  demonstrate   a  unique 
method  of  providing  a  "rolling  page"    effect  on  the  display 
tube       The  details  of  the  technique  are  explained  in  section  4, 
It  was  originally  planned  to  provide  much  more  programming 
for  the  data  display  unit,    however,   the  unexpected  complexity 
of  the  Coop  Monitor  System  limited  the  extent  to  which  the 
authors  were  able  to  pursue  this  task.     Modifications  to  the 
Coop  Monitor  System  were  made  to  couple  the  data  display 
to  the   system.     If  time  permits  before  termination  of  this 
work ,    the   display  driver  routines  will  be   completed  to  provide 
normal  input/output  capability  between  the  display  and  the 
central  processing  computer. 

Two  additional  projects  of  secondary  importance  were 
completed.     They  were  the  provision  of  tape  control  programs 
to  enable  utilization  of  the   1607  magnetic  tape  units  by  the 
CDC   160   computers  when  assembling  programs  using  the  CDC 
160  OSAS  Assembly  System.     The  other  project  was  the 
developement  of  a  merg   sort  routine  for  large  files  written 
in  120   character  BCD  format.     This   sorting  capability  was  a 
very  desireable  ability  which  had  not  previously  been 
available  at  this  installation. 


2.0     FORTRAN   60   SYSTEM 

The   Fortran  60    System   is  the   present  fortran  processor 
in  use  at  the   Postgraduate  School.     It  is  maintained  on  a 
system  library  tape,   recorded  in  binary  format,    54  words  per 
record,    see  refu21.     The  records   are  grouped  sequentually 
such  that  one  record  or  several  records  may  constitute  a 
program  package.     These  packages   are  referred  to  as  being 
"subroutines".     The  first  such  package  on  the   system  library 
tape  is  the   System  Control  Routine  and  is  titled  "Resident". 
Operation  of  the   system  is  as   illustrated  by  figure   1.     The 
figure  points  out  the  control  transfer  sequence  which  takes 
place  after  the  resident  program  is   "bootstrapped"    into  the 
1604   computer's  memory „     A  short  verbal  explanation  of  the 
diagram  follows i  Initial   "bootstrap"   procedures  are  executed 
by  the  operator.     This  reads  in  the  Resident  program  from  the 
system  library.     The  resident  program  then  assumes   control  of 
the  computer. 

2  o  1     Program  Control 

The   section  of  resident  in  which  control  normally  resides 
is  termed  "Program  Control".     The  function  of  program  control 
is  to  interpret  control  instructions  which  will  direct  the  transfer 
of  control  to  some   secondary  control  package  or  subroutine. 
All  such  routines  must  eventually  return  control  to   "Program 
Control".     Normally  program  control  reads  its  instructions 
from  the  console  typewriter.     These  control  statements  may 
be  any  one  of  the  twenty  routine  names   shown  by  figure   1 , 
or  one  of  the  eight  transient  program  names  which  previously 
may  have  been  "called"    into  core   (memory)   by  the  call  routine. 
Some  of  the  twenty  control   statements  have  arguments  <>     The 
CDC  Fortran  System  Manual  and  its  update  revision,  notices 
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discuss  the  use  of  these  arguments   and  control   statements, 
with  the   exception  of  the   statement   "SR"o     This   statement 
was  added  by  the  authors  to  provide  automatic  call  of  eight 
frequently  used  service  routines   such  as  transfer,   vfylib, 
list,    copys,    verify,    etc. 

As  mentioned  before,    normal  operation  of  the  control   system 
requires  that  all   sub-program  packages,    to  which  control  may 
be  transferred,   must  provide  for  returning   control  back  to 
Program  Control  at  the  end  of  the  directed  processing   sequence. 
Thus  an  examination  of  the  resident  programming,    appendix  IV, 
will  find  that  it  consists  of  several  small  programming   sub- 
routines.    Some  of  these  are  self  contained  and  some  are 
linked  to  other  routines  which  assist  in  the  performance  of 
the  functional  task  for  which  each  basic  package  was   designed. 

2o2     Monitor 

It  has  been  pointed  out  that  "Program  Control"   has  a 
very  responsible  task  in  the  organization  of  the   system,    since 
it  is  the  prime  control  routine.     The  next  most  important  and 
the  largest  offhe  programming  packages  in  resident  is  the 
processor  for  the  control   statement,    "Monitor"    or  sometimes 
called  "Monitor  Control".     It  is  a  routine  to  which  program 
control  can  transfer  control  of  the  computer  to  provide  auto- 
matic processing  of  stacked  input  Fortran  Programs  -     Monitor 
is  by  far  the  most,  complex  of  the  resident  routines  and  yet, 
compared  to  the   second  generation  system,    Coop  Monitor,    it 
is  rather  simple  „     A  full  understanding  of  the  monitor  routine 
is  best  obtained  by  reading  this   section  of  coding  in  appendix 
IV.     Briefly,    operation  of  the  monitor  is  as  follows.     Program 
Control  receives  a  statement,    "Monitor, 3,4 „ "     This   statement 
could  have  had  up  to  seven  arguments ,    but  for  this  example 
two  will  be  sufficient.     This   statement  directs  program  control 


to  transfer  the  arguments  into  the  monitor  control  routine 
and  then  to  transfer  control  to  monitor.     Monitor  then  tests 
certain  flags  to  check  if  recovering  from    a  previous  job 
execution  which  lost  control,    requiring   a  forced  recovery  entry 
back  to  monitor.     This  not  being  the  case,    monitor  then 
reminds   all  output  mediums,    senses  for  input/output  conflicts, 
initilizes  for  next  library  routine  call,    builds   a  tape  assignment 
table,   reads  from  the  input  medium   (tape   3  in  this   example), 
detects   a  job  description  record,    calls  in  the  Fortran  compiler, 
inserts  the  necessary  arguments  into  the  compiler,    then 
transfers  control  to  the  compiler  for  compilation  of  the  input 
program.     If  the  program  is   successfully  compiled,    control 
is  returned  to  monitor  and  monitor  then  transfers  control  to 
the  program  just  compiled,    this  is  termed  "executing  the 
program"  .     If  the  program  is   successfully  executed,    it  returns 
control  back  to  the  monitor  which  then  returns  to  process  the 
next  job  on  the   stacked  input  medium. 

2.3     Resident  Routines 


The  technique  of  transferring  control  of  the  computer  has 
been  demonstrated  and  we   should  now  discuss  a  technique 
of  utilizing  the  resident  routines  which  are  available  to  non- 
resident programs  „     The  organization  of  the   system  provides 
what  are  called  "low  core"    (cells   7  thru  35),    entry  points. 
These  entry  points  are  assigned  to  be  the  permanent  entries 
to  several  of  the  programming  packages   contained  in  resident. 
All  of  these  entries  are  shown  in  figure   2 .     Since  these  cells 
are  permanently  assigned,    standardization  limits  all     usage 
of  the  resident  routines  by  non-resident  programs  to  enter 
via  the  appropriate  low-core  cell.     This  then  allows  modifi- 
cations to  be  made  on  the   system's   "Resident"   routine  with- 
out influencing  the  non-resident  routines.,     As   illustrated  by 


figure  2  ,  eight  of  the   low-core   entry  routines  have  switches 
which  condition  on  whether  monitor  is  controlling  the  job 
sequencing.     If  the  monitor  is  in  effect,  then  these  eight  entries 
are  diverted  in  order  to  trap  illegal  monitor  usage  of  input/ 
output  units. 

The  low-core  entry  routines  are  rather  self  explanatory,, 
They  are  mostly  service  routines  such  as  read,  write,  equipment 
controllers,  and  message  handlers. 

Nearly  all  the  routines  in  resident  fall  into  one  of  the  two 
groups  discussed.    There  are  a  few  which  are  not  in  either 
group.    These  shall  now  be  discussed. 

Two  similar  routines  which  have  not  been  mentioned  are 
the    "Input  Index  Register  Loader"    and  the    "Output  Index 
Register  Loader"   routines.     These  two  serve  to  translate  the 
alphabetical  equipment  designators   into  the  equipment  codes 
as  listed  on  the  first  page  of  the    "Resident  List",    appendix 
IV.     These  equipment  codes  are  then  loaded  into  index 
registers  #1   and  #2.     The  index  registers  then  control  the 
proper  equipment  selection  for  the  read/ write  routines. 

Two  other  routines  are  the    "Tape  Read/ Write"    routines. 
These  are  both  tape  drive  routines  for  controlling  the   system's 
magnetic  tape  units.     The  routines  are  commoly  used  by  both 
the  BCD  and  Binary  Read/Write  routines  =     The  tape  drive 
routines  apparently  were  the  only  equipment  drivers  deemed 
worthy  of  individual  programming .     All  other  equipment 
drivers  are  embedded  into  the  main  body  of  the  Read/Write 
routines. 

There  is  a  routine  called,    "Initialize  for  Next  Call". 
Its  function  is  to  reset  the  program  bias  and  program  counter 
cells,    #62   and  #63  respectively,    prior  to  calling  each 
program  from  the  library  tape.     This  routine  is  bypassed  if 
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a  "Hold"  control  statement  was  issued  immediately  prior  to  the 
issue  of  the  "Call"  statement. 

One  final  routine  to  be  discussed  is  the  low-core  cell  #22 
entry  routine,  "Chain"  .    Its  purpose  is  to  call  a  named  program 
from  a  designated  library  medium,  then  execute  it  without  pack- 
ing any  arguments.     This  provides  a  method  of  segmenting  a 
program  which  is  too  large  to  fit  into  the  available  core  memory 
along  with  its  "Common  Storage  Data  Arrays ".    Thus  the  segments 
can  be  called  into  core  one  at  a  time  for  execution  .    Each  segment 
over-writes  the  previous  segment <,    Processed  data  from  one  seg- 
ment to  the  next  is  inter-changed  via  designated  common  storage. 
This  idea  is  extended  one  step  further  in  the  COOP  MONITOR 
system  by  providing  both  segmenting  and  over-lay  modes  of 
operation. 

The  remaining  resident  routines,  which  were  added  to  resident 
by  the  authors,  shall  be  discussed  in  section  4„2  and  section  4„4. 
These  sections  concern  the  "Data  Display  Programming"  and  the 
"Satellite  Station  Programming "  . 

2  A    System  Characteristics 

Perhaps  the  most  significant  characteristic  of  the  Fortran  60 
System  is  that  in  its  original  form,  its  Resident  control  programming 
including  all  equipment  control,    job  sequencing  monitor,    and 
basic  service  routines  occupied  only  4000  octal  cells  of  core 
storage.    The  next  most  important  feature  of  the  system  is  its 
simplicity  of  organiztion  when  compared  with  the  COOP  MONITOR 
system.    This  is  due,  of  course,  to  its  limited  scope.    For  some 
uses  this  simplicity  is  of  great  importance  „    Later  the  COOP 
MONITOR  system  will  be  discussed,  at  that  time  we  shall  see 
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that  it  has  many  advantages  over  the  simplier  Fortran  60  System,, 
With  this  comparison  to  make,  it  is  necessary  to  list  the  relative 
advantages  and  disadvantages  of  the  Fortran  60  System, 

2,4,1    Advantages 

a.  SIZE;     As  mentioned,  the  basic  control  programming  was  a 
modest  4000  octal  cells      The  authors1  additional  programming 
to  provide  a  remote  satellite  computing  station,  and  cathode  ray 
tube  data  display  facility  increased  the  resident  size  to  only 
5000  octal  cells.    This  remains  a  fairly  acceptable  figure , 

b.  FAST  STACKED  JOB  PROCESS  TIME;      The  Fortran  60  monitor 
operates  in  a  mode  which  allows  re-use  of  the  Fortran  Compiler 
by  many  different  jobs.    This  saves  library  reference  time  and 
hence  saves  process  time,  provided  the  compiler  remains  un- 
damaged.   The  compiler  compiles  in  memory  only  and  uses  no 
scratch  tapes,  this  also  leds  to  a  very  fast  compilation.    There 
are  disadvantages  to  both  these  techniques  which  over  shadow 
the  advantages      These  will  be  discussed  as  listed  disadvantages. 

Co     MINIMUM  INPUT  /  OUTPUT  UNITS  REQUIRED;      It  is  possible 
to  operate  the  Fortran  60  System  with  only  three  I/O  units  operating 
This  can  be  a  big  advantage  when  several  I/O  units  are  inoperative 
or  are  assigned  for  utilization  by  the  center's  160  computers « 

d.     OPERATOR  SERVICE  ROUTINES;     A  well  developed  repertoire 
of  operator  service  routines  are  an  important  advantage  to  a  system, 
Fortran  60  has  several  such  routines  such  as;    endfile  mark  tapes, 
rewind,  lock,  duplicate  tape,  verify,  list,  etc    Given  a  little 
time,  the  COOP  MONITOR  System  will  probable  incorporate  several 
of  these  routines. 
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e.    OPERATOR  TRAINING  TIME;     At  the  Postgraduate  School  many 
students  are  given  instruction,  check-out,  and  direct  access  to 
the  school's  computers .    As  many  as  250  students  may  participate 
in  these  laboratory  periods  per  year.    Fortran  60,  with  its  sim- 
plicity provides  a  good  vehicle  for  instructional  purposes. 

f  .     MONITOR  /  OPERATOR  REQUIREMENTS;      The  Fortran  60 
monitor  system  requires  a  minimum  of  operator  intervention  to 
process  a  stacked  job  run.    Unless  one  of  the  jobs  "blows  the 
system  Off-Line"  ,  ie  ;    manages  to  execute  a  storage  or  jump 
instruction  erroneously,  the  system  requires  no  operator  assists . 
The  COOP  MONITOR  requires  considerable  operator  manipulation 
of  "Jump  Keys"  and  loading  /  unloading  of  tapes,  etc.     Thus  the 
Fortran  60  System  normally  requires  less  operator  supervision „ 

g .     LIBRARY  MAINTENANCE;      Library  maintenance  and  updating 
should  not  be  a  daily  occurance,  however  it  is  required  frequently  „ 
Therefore  a  quick  and  reliable  system  to  accomplish  this  task  is 
required.    Fortran  60  has  three  routines  and  a  simple  organization 
which  make  this  an  easy  job.    The  routines  are;  transfer,  vfylib, 
and  list.    In  contrast,  the  COOP  MONITOR  System's  "Libedit" 
routine  is  rather  complex,  is  indirect  via  punched  cards,  and 
requires  apriori  knowledge  concerning  the  current  "directory" 
of  routines  on  the  library „     It  would  be  nice,  if  a  directory  dump 
routine  was  written  and  also  an  individual  routine  verify  capability 
is  required. 

h.    MIXED  FORTRAN  and  SYMBOLIC  STATEMENTS;      Fortran  60 
incorporates  a  fortran  compatible  symbolic  language  =     Programs 
written  for  this  system  can  inter-mix  both  symbolic  and  fortran 
statements  on  a  line  for  line  bases,  if  desired.    For  many  uses 
such  as  programming  shifts,  logical  and  masking  operations, 
searches,  and  other  computer  operations  which  the  Fortran  60 
language  doesn't  provide,  this  ability  has  a  distinct  advantage. 
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i„    INTERRUPT  ROUTINE  USAGE;      The  only  usage  of  the  Interrupt 
routine  in  the  Fortran  60  System  is  for  providing  a  real  time  clock . 
This  would  appear  to  be  a  gross  neglect  of  such  a  powerful  equip- 
ment capability      The  advantage,  here,  is  that  the  provision  for 
a  satellite  station  operation  requires  much  usage  oi  this  interrupt 
routine,  hence  having  a  system  which  doesn't  utilize  the  inter- 
rupt in  some  complex  manner  is  unique. 

2  o 4 = 2    Disadvantages 

a.    COMPILER  VULNERABILITY;     As  mentioned  under  advantages,  the 
Fortran  60  compiler  is  normally  called  into  the  computer's  memory 
only  when  initializing  monitor  processing  of  a  stacked  job  run.  Thus 
there  exists  the  possibility  that  one  of  the  individual  jobs  may  poss- 
ibly damage  the  compiler  =    There  after  the  remaining  jobs  of  the 
stack  are  forced  to  be  compiled  by  a  compiler  which  is  no  longer 
reliable.    This  car  result  in  significant  loss  of  computer  and  program- 
mer's time,  since  the  programmer  is  led  to  believe  his  program  was 
incorrect  „ 

b      SLOW  TAPE  HANDLING  TECHNIQUES;      Two  standard  length  tape 
records  are  employed,,    Standard  binary  records  are  54  words  long 
Standard  BCD  records  are  15  words  long,  thus  providing  for  120 
character  records 0    This  standardization  is  an  advantage  in  some 
instances.    However,  the  disadvantage  is  the  cost  in  time  which 
must  be  paid  since  the  tape  motion  must  be  stopped  and  started 
between  each  reccrdc    The  COOP  MONITOR  System  solved  this 
problem  quite  wellc    A  second  detriment  to  tap<o  handling  is  the 
lack  of  utilizing  the  buffer  input  /  output  channels  to  advantage. 
The  only  usage  of  the  buffer  capability  is  employed  under  monitor 
process  control  .     In  this  instance,  very  poor  usage   is  made  since 
there  is  a  complete  disregard  for  error  checking  during  input  /  output 
operations.    ThiL  slow  tape  handling  characteristic  is  a  serious 
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one  since  much  time  is  spent  by  the  system  in  searching  the 
library  tape.    The  library  tape  can  grow  to  be  of  considerable 
length  due  to  the  considerations  discussed  as  a  disadvantage 
due  to  "Multiplicity  of  Subroutines  on  the  Library"  .    COOP 
MONITOR  solved  this  problem  by  providing  long  variable  length 
library  records  and  a  directory  which  prevents  searching  the 
full  length  of  the  library  tape  for  routines  which  are  "not  avail- 
able". 

Co    PROGRAM  SIZE  LIMITATIONS;     Since  Fortran  60  doesn't 
utilize  scratch  tapes  during  compilation,  it  requires  that  memory 
must  hold  the  resident  program  (  4000  )  plus  the  compiler  (  14000  ) 
plus  the  compiled  version  of  the  user's  program  plus  an  undefined 
number  of  cells  outside  the  compiler  which  are  used  by  the  compiler 
for  tables  and  temporary  storage.    Thus  the  programmer  losses  at 
least  20,000  octal  cells.    This  is  a  serious  limitation  in  many 
large  programs.    COOP  MONITOR  has  improved  this  situation, 
but  at  a  considerable  cost  in  speed,  due  to  the  necessity  of  re- 
loading the  compiler  for  each  job  and  also  having  to  provide  an 
intermediate  and  "Load  and  Go"  tape. 

d.    INEFFICIENT  SPACE  COMPILATION;      Fortran  60  compiles  the 
full  size  of  arrays  and  reserved  space  into  the  binary  object  pro- 
gram (  ie.  card  images  corresponding  to  the  compiled  program  ) 
at  compile  time.    This  coupled  with  the  compilation  limitation 
mention  ed  previously  tends  to  further  hinder  efficient  usage  of 
memory  space  during  compilation  of  programs.    One  advantage 
this  does  provide  is  that  arrays  and  reserved  spaces  are  initially 
cleared  in  a  Fortran  60  program.    This  is  not  true  of  a  GOOP 
MONITOR  compiled  program. 
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e .  MULTIPICITY  of  SUBROUTINES  on  the  LIBRARY;      Fortran  60 
requires  that  all  subroutines  called  by  a  program  be  available  at 
compile  time.    The  reason  for  this  is  that  they  are  embedded  into 
the  compiled  program  as  it  is  compiled „    If  this  compiled  program 
is  then  added  to  the  library,  the  library  is  unnecessarily  length- 
ened.   This  is  due  to  the  fact  that  versions  of  the  existing  sub- 
routines are  embedded  in  many  programs.     Not  only  does  this 
scheme  of  compilation  lengthen  the  library  tape  and  thereby 
slow  the  system  down,  but  it  also  creates  very  serious  library 
maintenance  problems.    Thus  the  simple  corrections  or    updating 
of  a  subroutine  isn't  so  simple  anymore  „    In  order  to  correct  a 
subroutnie,  it  is  necessary  to  re-compile  all     programs  which 
use  the  subroutine „    This  is  due  to  the  embedding  effect.  This 
can  get  to  be  a  big  bookkeeping  problem  and  can  create  a  lot 

of  work.    Again  the  COOP  MONITOR  System  has  solved  this  problem 

f .  NO  PROVISIONS  FOR  MIXED  BINARY  /  BCD  INPUT  PROGRAMS; 
Fortran  60  does  not  provide  any  method  for  inputting  a  binary 
program  or  subroutine  into  a  stacked  monitor  run,  if  it  is  not 
already  a  part  of  the  library.    Thus  no  mixed  input  to  the  system 
is  allowed.    This  requires  frequent  recompilation  of  subroutines 
and  programs  which  are  not  incorporated  onto  the  library  tape0 
Again  the  COOP  MONITOR  /  FORTRAN  62  System  provides  the 
solution. 

g.  LIMITED  "DE-BUGGING"  AIDS;     The  only  automatic  de- 
bugging aids  incorporated  into  the  Fortran  60  System  are  the 
compiler  and  arithmetic  error  print-outs.    The  selectable  aids 
consist  of  a  "Map  Language"  (  see  ref .  #21,  pg  #102  )  listing 
of  the  compiled  program ,  and  a  few  dump  routines  which  were 
never  very  effective.    A  magnitude  improvement  has  been  made 
by  the  COOP  MONITOR  System  towards  providing  de-bugging 
facilities,  both  automatic  and  optional. 
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ho     UNDESIRABLE  INTERMEDIATE  LANGUAGE  FORMAT;    The  inter- 
mediate language  of  the  Fortran  60  compiler  is  "Map  Language"  . 
This  form  of  computer  coding  can  become  familiar,  but  only  a 
small  percentage  of  the  general  users  of  the  computer  facility 
were  ever  motivated  to  use  it.    Three  "languages"  for  coding 
a  single  compiler  seems  to  be  more  than  should  be  required. 
Successful  utilization  of  the  Fortran  60  System  requires  a  know- 
ledge of  the  fortran  language,  CDC  Symbolic  format,  and  of  the 
intermediate  language,  "Map".    The  Fortran  62  system  is  a  two 
language  system  and  is  quite  acceptable  except  for  the  exclus- 
sion  of  the  line  for  line  inter-mix  capability  between  fortran 
and  symbolic  coding , 

i.     POOR  INPUT  /  OUTPUT  FLEXIBILITY  UNDER  MONITOR  CONTROL; 
The  Fortran  60  System  originally  had  a  very  weak  tape  assignment 
system.    It  would  assign  tapes  for  scratch  when  the  units  weren't 
even  loaded.    This  was  corrected  by  the  authors  for  the  school's 
facility.    Another  deficiency  is  the  inability  of  the  monitor  to 
provide  multiple  input  /  output  BCD  units  „    This  is  desired  in 
many  programs,  for  instance,  when  cumulative  data  is  being 
generated  and  processed  over  a  long  period,  or  when  special 
table  lists  are  to  be  formed  by  a  program,  etc 

j .     SLOW  CARD  READ  /  PUNCH  ABILITY;      The  school's  "On- Line" 
card  facility  is  a  CDC  1609  system  which  is  capable  of  operating 
at  either  50  or  100  cards  per  minute.    The  Fortran  60  system 
provided  operation  only  at  the  50  card  per  minute  rate.    COOP 
MONITOR  will  run  at  the  maximum  speed  of  100  cards  per  minute 
and  compiles  as  it  reads  if  the  card  reader  is  being  used  for  input » 
This  rate  is  still  too  slow  for  a  general  usage  on-line  input  medium, 
hence  it  is  used  only  as  a  back-up  system  for  the  IBM  ]401  System 
which  normally  processes  the  card  to  tape  conversion  "off-line"  . 
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3.0  COOP  MONITOR  SYSTEM 

The   COOP  MONITOR  SYSTEM  was   developed  to  allow 
a  computer  facility  the   ability  to  operate  with  only  one 
"library"   tape  and  yet  effectively  process  any  type  of  input 
programming  or  source  language.     This  would  eliminate  the 
need  to  sort  incoming  jobs   into  separate  groups  to  be  run 
under  individual  library  tapes  =     The  advantage  of  a   single 
library  is  readily  apparent  when  operation  from  a  remote 
station  is  anticipated,    where  the  operator  is  physically 
separated  from  the  main  computer  and  unable  to  change  the 
current   system  library  tape. 

To  increase   COOP  MONITOR'S  flexability  it  is   organized 
into  two  basic  levels  of  control.     At  the  highest  level  is  the 
Master  Control  System   (MCS)  ,    which  maintains  the  overall 
system  coordination  and  supervision.     At  the  next  level  is 
the  Secondary  Control  System   (SCS) ,    and  there  may  be  any 
number  of  these  available  on  the  library.     Each  SCS  is 
designed  to  perform  a  particular  job  or  combination  of  jobs 
depending  on  the  requirements  of  the  computer  facility., 

A  brief  description  will  now  be  given  covering  the  basic 
organization  and  operation  of  COOP  MONITOR,   for  a  more 
detailed  description  refer  to  ref.10. 

3. 1  Master  Control  System 

To  accomplish  the  desired  system  super-vision,    MCS  is 
organized  into  nine  functional   subroutines  and  the  Bootstrap 
loader   (BOOT),    see  figure  3.     BOOT  and  the  first  eight  sub- 
routines make  up  the    "permanent"  resident,    with  the  memory 
space  occupied  by  the  Job  Sequencer   (  6000   cells)   released 
for  use  each  time  control  is  given  to  the  Secondary  Control 
System  o     After  the  SCS  has  finished  using  the   subroutine 
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"Loader"    the  memory   space  it  occupied  may  also  be  released 
for  use  by  the   current  program.     This  procedure  allows  MCS 
to  be  very  large  and  complex  (  13500   cells)    and  yet  not  unduly 
penalize  an  input  program  in  memory  space  requirements ,     The 
basic  functions  of  each  subroutine  are  as  follows;; 

a.  BOOT;     Contains  the  Available   Equipment.  Table    (  AET)  , 
which  enables  MCS  to  determine  the  input/output  units 
available  to  the  computer  and  their    intended  use=     This 
routine  will  load  on  option  either  MCS  or  the   system  recovery 
dump  routine    "EXTREC"  .     BOOT  also  contains  the  MCS  flags 
to  store  current  job  information  to  allow  intra- job  continuity. 

b.  CLOCK;    Allows  use  of  the  computer  real  time  clock  to 
set  a  time  limit  on  the  current  job.     This  routine  is  available 
to  the  programmer  to  set  one  additional  time  limit  and  also 
may  be  used  to  determine  elapsed  time0 

c.  MEMREC;  Maintains  a  record  of  the  limits  on  the  one 
contiguous  block  of  available  memory  between  resident  and 
any  programs  loaded  into  high  core. 

d.  OPCON;     All  communication  between  the  compiler  operator 
and  MCS  or  SCS  is  thru  this  routine.     This  input  or  output 

is  normally  via  the  console  typewriter  „ 

e.  INTERRUPT;     This  routine  has  three   sections,    SELECT, 
DETECT,    and  REMOVE       These  allow  for  the   selection  and 
detection,    or  the  release  of  any  of  the  internal  computer 
interrupts  or  on  channels   1   to  6  inactive . 
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f.     READ/WRITE;     This    subroutine   controls       all     input/output 
operations  of  the  computer.     Provides  protection  from  illegal 
use  of  any  unit  and  prevents  interference  between  units  on 
the   same  channel, 

g0     ERROR;     Used  in  the  event  of  user  program  failure   or  the 
detection  of  illegal  operation  by  MCS,    entry  into  this   sub- 
routine will  terminate  the   current  job.     ERROR  will  output 
the  current  contents  of  all  the  console  registers    (  on  the 
standard  output  medium)    and  the  lower  address  of  cell   7, 
and  then  determine  if  the  user  desires  a  memory  dump, 

h„     RW1607;     The  driver  for  the  magnetic  tape  units  and  the 
only  driver  contained  within  MCS.     This   subroutine  is  the 
only  place  where  tape  units  are   selected  and  activated, 
except  in  BOOT  for  loading  MCS  or  EXTREC, 

i.     LOADER;     Loads  all    relocatable  binary  programs  or  sub- 
routines either  from  the   system  library  or  user  provided  input 
medium.     This   subroutine  packs  programs  into  high  core  memory 
with  common  block   storage  assigned  to  low  core  just 
following   "  LOADER"  . 

jo     JOB  SEQUENCER;     Used  between  input  jobs  to  set  program 
limits,    determine  and  load  input/output  drivers  requested  by 
the  user,    and  to  call  and  transfer  control  to  the  desired 
Secondary  Control  System    (  SCS  ) .     This   subroutine  also 
contains  the  programming  to  process  any  computer  operator 
statements  received  via   "OPCON". 

These  functional  blocks  are  closed  subroutines  with  multiple 
entry  points  depending  on  the  particular  function  desired.     These 
entry  points  are  available  to  all  routines  and  must  be  used 
whenever  one  of  the  above  operations  is  necessary.     This  also 
includes   other  blocks  within  MCS,  example,  The  JOB  SEQUENCER 
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Figure  3 


must  use   LOADER  to  make  a   library  call,    and   LOADER  in 
turn  must  use  RW1607  to  actuate  and  read  the  magnetic 
tape  unit.     These   subroutines  operating  together  as  a  Master 
Control  System  provide  the  following  features: 

a.     Automatic,    variable  job      sequencing,  including   accounting 
records  and  time  and  output  line  limits   set  for  each  job. 

bo     Operator-Machine  communication. 

c.  Assignment  of  all  input/output  units  and  the  loading  of 
the  necessary  drivers  for  these  units. 

d.  Single  linkage  to  all  input/output  drivers  to  protect  them 
from  interference  and  illegal  use. 

e.  Flexible  linkage  to  the  CDC  1604   interrupt  features. 

f„     Automatic  recovery  features  in  the  event  of  "user"    program 
failure . 

g.     Calling  and  tranfer  of  control  to  any  desired  Secondary 
Control  System  (  SCS  )  „ 

The  assignment  and  control  of  input/output  equipment  by 
the  MCS  is  accomplished  thru  three  tables  „     The  first,    the 
Available  Equipment  Table   (  AET  ),    lists  all  the  input/output 
equipment  connected  to  the  computer.     Some  of  these  I/O 
units  are  designated  as   "standard"    (  SIO  )  ,  and  are  assumed  to 
be  always  available  for  use  by  the   system .     The  entries  in  the 
AET   (  one  for  each  I/O  unit )  ,  contain  the  following  information: 
Allowed  use,    current  job  assignment,    standard  unit  or  not, 
equipment  type ,    and  the  location  of  the   I/O  driver  name .     For 
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a  complete  description  of  the  AET  entry  format  see  ref.10. 
This  table  is   set  for  each  installation  and  is  changed  only 
as  equipment  status  changes.     A  listing  of  the  current  AET 
is   shown  in  figure   6c. 

The   second,    the  Available  Equipment  Driver  Name  Table 
(  AEDNT  ) ,    lists  the  name  and  entry  point  location  for  each 
I/O  driver  subroutine  for  controlling  the  units  listed  in  the 
AET.     The  entries  are  two  words  long.     The  first  word  contains 
the  entry  point  locations  of  the  routine  if  it  is  in  memory,    or 
an  exit  to  MCS  if  not  in  memory,    see   section  3*5   part  D  for 
an  example  of  an  AEDNT  entry. 

The  third,    the  Running  Hardware  Table    (  RHT  ) ,  lists  the 
input/output  assignments  of  units  for  the  current  job  only. 
The  entries  are  AET  entries  with  the  address  of  the  proper 
driver  entry  point  inserted  and  the  allowed  use   set.     Logical 
unit  numbers  are  used  as  an  index  to  this  table,    logical 
numbers   1-49  are  available  to  the  programmer,    0   is  reserved 
for  the   system  library  tape  and  50-63  for  standard  units. 

3.2     Secondary  Control  Systems 

The  great  flexibility  possible  with  the  COOP  MONITOR    is 
in  the  use  of  a  Secondary  Control  System    (  SCS  )    to  control 
the  processing  of  a   specific  job.     There  can  be  any  number  of 
Secondary  Conrol  Systems  which  may  be  written  by  each  computer 
facility  to  handle  the   specialized  needs  of  its  users.     Thus 
for  use  at  the  Postgraduate  School  the   standard   "stacked  job" 
daily  production  runs  would  be  controlled  by  one  SCS,    and  a 
satellite  digital  controller  simulation  by  a  different  SCS,    and 
a  real  time  radar  intercept  problem  by  a  third  SCS.     All  of  these 
SCS  would  be  placed  on  the   standard  library  tape  and  available 
within  a  few  seconds  after  a  particular  one  is  called  from  the 
library.     No  modification  is  needed  in  the   standard  COOP  MONITOR 
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to  use  a  different  SCS.     The  name  of  the  desired  SCS  is 
given  to  the  JOB  SEQUENCER  in  MCS  at  the  begining  of  each 
job  and  this   name   will  go  to  LOADER  and  the   SCS  will  be 
loaded  from  the    system   library. 

There  are  two  SCS  provided  in  the  present  version  of  COOP 
MONITOR,    these  are   called    "COOP"    and   "LIBEDIT"..     A  brief 
description  of  each  is  given  to  illustrate  the   technique  of 
tailoring  a  SCS  to  do  a   specific  problem .     The  first,    COOP, 
is  responsible  for  the   intra-job   sequencing   necessary  to 
compile   and  execute  an  input  job,    ie;   the   calling   of   compilers 
or  assemblers,    transferring  binary  card  images  to  a   "load  and 
go"   tape,    calling   LOADER  to  load  the    "load  and  go"   tape  and 
finally,    execute  the   loaded  program.     The  present  version  of 
COOP  can  call  two  compilers,    FORTRAN-62   and  CODAP1 
(  actually  an  assembler  ) ,    but  COOP  can  be  modified  to  accept 
any  number  of  compiler  languages.     COOP  also  contains 
internal  routines  for  user  controled  binary  deck  manipulation, 
loading  and  execution. 

The   second,    LIBEDIT,    has   two   subroutines,    Edit  Library 
Tape   (  ELT  )    and  Prepare   Library  Tape    (  PLT  ) .     Edit  Library 
Tape  is  used  for  minor  changes  in  the   system  library   such  as 
a  deletion  or  addition  to  the   subroutine  file  or  within  MCS  and 
EXTREC.     This   secondary  control  system  makes  a  copy  of  the 
present  library  tape  upto  the  point  of  the  desired  change  and 
then  inserts  or  deletes  the  proper  information.     For  a  detailed 
description  of  the   steps   necessary  in  a  complete  LIBEDIT,    see 
appendix  I  and  ref.l70     Prepare  Library  Tape  is  used  for  major 
changes  to  the   system   library.     The  user  must  now  supply  all 
the  information  necessary  to  produce  a  new  version  of  the 
system  library  tape ,    nothing  is  copied  from  the  old  library 
tape.     LIBEDIT  does  not  provide  any  means  of  verifying  the 
portions  of  the  new  library  tape  that  were  not  changed  . 
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3  .  3     System  Operation 

A  brief  description  of  the  operation  of  MCS  can  now  be 
given,    for  a  more   detailed  description  see  ref.lCL     The  first 
record  of  the   library  tape,    BOOT,    see  figure   4,    is   read  into 
the  computer  by  manually   selecting  and  activating   the  proper 
magnetic  tape  unit.     BOOT  is  then  executed  at  cell  #2,    see 
figure   6 ,    and  will  verify  the  AET  table  and  then   skip  over 
the  next  record  on  the   library  tape,    EXTREC,    and  load  MCS, 
see   figure   4.     Control   is   now  given  to  MCS  which  determines 
the   standard  input/output  units    (  SIO  ) ,  loads  the  necessary 
drivers  for  those  units  if  they  are  not  in  memory,,    fills  the 
unused  memory   space  with  a  jump  to  ERROR  instruction  to 
trap  user  program  failures,    and  then  notifies  the  computer 
operator  the   system  is  ready  to  accept  job  assignments .     The 
operator  then  either  signals  MCS  to  alter  the  AET  or  SIO 
assignments  or  to  begin  processing  the   "stacked  job"   on  the 
standard  input.     When  signalled  to  begin  processing,    MCS 
reads  the  control  card  from  the   standard  input,    logs  the  first 
job  on  the   standard  outputs   (  list  and  punch  tapes  and  the 
console  typewriter  )  ,    and  sets  the  time  and  output  line  limits 
for  the  current  job,  the  recovery  key  is   stored  in  BOOT„     The 
input/output  units  needed,    in  addition  to  the   standard  units, 
by  the  incoming  job  are  determined  and  assigned  and  if  the 
proper  drivers  are  not  already  in  memory  they  are  called  and 
loaded.     MCS  then  releases  the  memory   space  occupied  by 
the  non-permanent   section  of  MCS   (  Job  Sequencer  )    for  use  by 
the  SCS  or  the  input  program.     The  desired  secondary  control 
system  is  determined  and  loaded  into  memory  and  MCS  then 
transfers  control  to  this  SCS,    see  figure  5,     When  the  SCS 
has  finished  processing  the  current  job,    control   is  returned 
to  BOOT  with  an  indication  for  a    "normal"    or   "abnormal"    job 
termination.     For  a   "normal"   termination  BOOT  reloads  MCS 
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COOP   MONITOR    SYSTEM    MCS 

FLOW        DIAGRAM 

Figure    5 


and  if  there  are  more   jobs   on  the   standard  input,    the   cycle 
is  repeated.     For  a   "abnormal"    (error)    termination  a   "Console 
Scoop"  (  the  contents  of  all  the  console  registers  )    is   prepared 
and  sent  to  the   standard  output  tape  to  aid  the  programmer  in 
debugging  efforts.     The  recovery  key,    set  by  the  user  at  the 
start  of  the  job,    is   examined  to  determine  of  a  memory  dump 
is  desired,    if  not  control  is  given  back  to  BOOT  for   a  MCS 
reload  and  the  process  continues  as  before.     When  a  memory 
dump  is  desired  control  is  returned  to  BOOT  for  a  EXTREC  load, 
see  figure   6.  Extended  recovery  then  provides  the  desired 
memory  dump  on  the   standard  output  tape  and  returns  to  BOOT 
for  a  MCS  reload      Again  if  there  are  more  jobs  on  the   standard 
input  tape  MCS  will  start  the   sequence  over,    otherwise  it 
will  terminate  this  run  and  notify  the  computer  operator . 

3.4     System's  Characteristics 

Once  over  the  initial   shock  of  working  on  a   system  of  this 
size,    the  next  effort  was  to  consider  COOP  MONITOR'S  good 
and  bad  characteristics  when  the   special  requirements  of  the 
Postgraduate  School  computer  center  were  included  in  the 
system.     These   special  requirements  included  the  daily   "stacked 
job"   production  runs  of  short  duration,    longer  runs  by  the 
students  during  the  evening,    the  increased  use  of  the   satellite 
capability  of  the   schools   computers ,    and  the  addition  of  a 
sophisticated  digital  display  unit   (  Data   Display  Inc.  DD65  ) 
as  a  remote  computer  input/output  device.     In  this  light  the 
COOP  MONITOR  was  determined  to  have  the  following  major 
advantages  and  disadvantages: 

3.4.1     Avantages 

1.     The   system  can  handle   stacked  input  jobs  written  for 
multiple  compiler  languages.     The  present,  version  includes 
Fortran-62   and  Codapl  and  the   addition  of  the   Neliac   compiler 
and  the  Scrap  assembler  is  possible. 
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2 .  Operates  with  multiple   secondary  control   systems  each 
specifically  designed  for  a  job.     Present  system  has  two, 
COOP  and  LIBEDIT  and  others  may  be  added  to  process 
satellite   and  remote   display  problems. 

3.  Automatic,    programmer  controlled,  debugging   aids    such  as 
the    "console   scoop",    provided  in  the   event  of  program  failure 
and  the    "snap"   feature  for  those  that  do  not  fail  but  also 

do  not  produce   correct  results. 

4.  Automatic   system  recovery  in  the   event  of  failure   by 
the  input  program. 

5.  All  input/output  is  thru  one  routine,    therefore  it  is  very 
difficult  for  an  input  program  to  illegally  use  any  I/O  unit. 
Interference  between  units  is  also  minimized . 

6.  COOP  can  accept  mixed,    binary  and  source  language, 
input  programs. 

7.  Magnetic  tape  driver  routine  uses  variable  block  read  and 
write  for  maximum   speed  when  controlling  the   system  library 
tape.     All  read/ write  is  buffered,    with  parity  and  length  checking 

8o     Variable   standard  input/output  units  are  allowed  and 
these  can  be  changed  before  each  job. 

9.  Multiple  input/output  units  for  each  job  are  allowed 
up  to  the  maximum  available  to  the  computer . 

10.  The   system  is  capable  of  handling  very  large  input  programs 
as  MCS  releases  memory  and  the  compiler  used  is  over 
written  when  the  program  is   loaded  for  execution.,     For  programs 
that  are   still  too  large,    segmenting  and  overlaying  are  provided. 
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11.  The  compiler  used,    Fortran-62 ,   has   special  features  all 
its  own;     easy  to  read  intermediate  language   (  Codapl  )  , 
buffer  operation  for  input/output,    and   single   library   subroutine 
call  for  each  program  . 

12.  Compiler  is  reloaded  for  each  job  thus  assuring  a  clean 
start. 

13  o  The   system  will  accept  Fortran-63  when  it  is  available. 

3.4  o  2     Disadvantages 

1.  The  system  is  very  large  (  13500  cells)  and  complex, 
making  it  difficult  to  gain  the  understanding  necessary  to 
perform  any  system  modifications . 

2.  Many  complex   (at  first)    control  cards  are  necessary  to 
process  each  input  job. 

3.  Provides  an  unused  and  unsuppressable  accounting 
information  output  on  the  paper  tape  punch  o 

4.  Normal  system  operation  requires  a  large  number  of  standard 
input/output  units  to  be  operating.     Four  magnetic  tape  units 

(  library ,  punch ,  input ,  and  output  ) ,  the  paper  tape  punch  for 
system  accounting ,    and  the  console  typewriter  are  required 
to  satisfy  the    "standard"   I/O  requirements , 

5 .  Inability  of  the  computer  operator  to  add  or  delete  a 
standard  input/output  unit  (  the  type  of  I/O  unit  can  be  changed  ) 

6.  Step  by  step  operation  by  the  computer  operator  via  the 
console  typewriter  is  not  possible . 
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7.     The   interrupt   schedule   is  not  compatable   with  a  real 
time   problem   solution  in  a  micro-second  time    sharing  mode, 
due  to  the  frequent  use  of  interrupt  lockout.     No  provision 
is  made  for  operation  from  a  remote   (  satellite)    station  . 

80     No  programmed  restart  available  for  use  by  non-autoload 
CDC  1604   computers    (  the  autoload  must  be   simulated  by 
manually  performing  the    required  instructions  ) . 

9.  No  operator  service  routines  are  available   such  as  call, 
copy,    transfer,    verify,    etc. 

10.  Program  errors  are   sent  only  to  the   standard  output  tape 
requiring  the  user  to  list  this  tape  before  determining  any 
errors . 

11„  The    system  would  not  output/input  on  the   CDC  1609 
card  punch/read  unit  available  at  the  computer  facility. 

3.5     Alterations  To  Coop  Monitor  System 

After  a  basic  understanding  of  the  Coop  Monitor  System 
was  obtained,    it  became  apparent   some  modifications  would 
be  required  before  the   system  would  be  acceptable  for 
operation  at  the   Postgraduate  School's  computer  facility. 

The  first  modification  attempted  was  the  alteration  and 
corrections  needed  in  the  cardread  and  cardpunch  drivers  to 
allow  operation  with  the  CDC   1609   card  read/punch  unit. 
In  addition  to  the  corrections,    it  was  also  necessary  to  rewire 
the  unit's  plugboard  to  make  the  read/punch  format  compatible 
with  the  Coop  Monitor,,     These  read/punch  routines  are  an 
improvement  in  speed  to   100   cards  per  minute  vice  the  50 
cards  per  minute  available  with  Fortran-60.     Once  the  drivers 
were  corrected,    they  were  recompiled  and  the  binary  versions 
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were  added  to  the    system   library  tape   using   the   secondary 
control   system    "LIBEDIT".     For  a   complete   description  of 
the   LIBEDIT  procedure,    and  the   input  job  format   see   appendix 
I,     The   correction  of  these   subroutines   provided  a   library 
tape  more   suited  to  the  needs  of  the   school  computer  center 
but   still  left  some  major  deficiencies  in  the   system  that 
would  prevent  convenient  operation.     These  were  the  following: 

a.  The   unsuppresable   accounting  medium   being   output  on 
the   paper  tape   punch,    requiring  the   punch  to  be   selected  at 
all  times.     This  made  the  paper  punch  unavailable  to  the 
user  as  an  output  device » 

b.  No  provision  for  a  programmed  restart  for  operation  on 

a  non-autoload  computer   (CDC  1604).     In  the  event  of  MCS 

failure  a  manual   "bootstrap"   is  required, 

Co     Error  messages  from  MCS   "LOADER"  are  not  available  to 

the  user  except  by  listing  the   standard  output  medium, 

do     No  provision  for  handling  operation  from  a  remote   station. 

The  correction  of  these  deficiencies  all  had  one  thing  in 
common,    they  would  all  involve  changes  within  the   structure 
of  MCS.     Many  early  failures   soon  made  it.  apparent  changes 
in  MCS  could  not  be  made  without  a  complete  understanding 
of  the  internal  organization  of  MCS,    and  a  positive  knowledge 
of  the  operation  of  LIBEDIT,     After  these  two  programs  were 
more  thoroughly  understood,    the  modifications  resulted  in  the 
successful  production  of  a  new  library  tape  providing  these 
new  features: 

a.  Accounting  medium   suppressed,    the  paper  tape  punch  is 
not  selected  unless  the  operator  intends  to  use  it  as  an 
output  medium . 

b.  A  programmed  restart  is  available,    at  cell  #30,    and 
this  will  simulate  the    "autoload"   feature  of  the  CDC   1604A 
except  for  the   initial   loado 
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c.     All   error  messages  from  MCS   "LOADER"   are   now  also 
output  on  the   comment  to  the  operator  medium ,    normally 
the  console  typewriter  . 

do     All   linkages   necessary   (  AET  and  AEDNT  entries)    for 
the   calling   and  execution  of  a  driver   subroutine  for  the 
remote   display   (  DD65  )    are   now  in  MCS,     Space  required 
for  this  driver  is  reserved   (  1000   cells  )   within  the    "permanent" 
section  of  MCS  just  prior  to  LOADER. 

These  modifications  now  provide  a  library  tape  that 
should  be   much  more   convenient  for  the   computer  center  to 
use  and  at  the   same  time  provide  a   system  that  will  readily 
accept  experimental  drivers  and  subroutines  for  operation  from 
the  remote   station  =     The  detailed  explanations  and  coding 
involved  in  these  modifications  are   shown  in  the  following 
sub-sections . 

Ao     Modifications  to  BOOT 

The  postgraduate   schools   computer   (  CDC   1604  )    is  a  non 
autoload  machine  and  thus  requires  a  manual   selection  and 
activation  to  read  the   library  tape.     The  COOP  MONITOR  uses 
the  autoload  feature  anytime  there  is  a  failure  of  the  automatic 
recovery  routine  „     To  avoid  the  necessity  of  this  manual 
"bootstrap"    each  time  this  may  occur  a   simulated  autoload  was 
placed  into  BOOT  starting  at  cell  #30 .     This  allows   an 
"autoload"   restart  when  needed.     At  the   same  time  the   standard 
input/output  assignments  in  the  Available  Equipment  Table 
(  AET  )    were  altered  to  provide  the  following , 

a .  Library  on  channel  3/4 ,    tape  unit  #1 

b.  Input  on  channel  3/4,   tape  unit  #2 

c.  Available  for  use,    channel  3/4,    tape  units  #3  and  #4 
do  Output  on  channel   5/6,    tape   unit  #1 

e .     Punch  on  channel   5/6 ,    tape  unit  #2 

fo     Scratch   1   and  2   on  channel  5/6,    tape  units  #3  and  #4 
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All  references  to  channel   1/2   magnetic  tape  units  were 
removed   (  the   school  has  no  units  available  )    and  the  I/O 
linkage  for  the  remote  display  driver  was  inserted,    see  figure  6. 

These   modifications  to  BOOT  altered  the   location  of  the 
begining  of  the  AET  and  the   subroutine   EXTREC  uses  this 
location  as  an  absolute  address.     This  required  recompiling 
EXTREC   with  the   correct  address  for  the  AET  and  then  placing 
this  on  the   system  library  tape  again  using  the  routine  LIBEDIT. 

B.     Suppression  of  Accounting   Medium 

The  original  version  of  COOP  MONITOR  provided  for 
accounting  information  to  be  output  on  the  paper  tape  punch . 
This  output  was  of  unknown  format  and  therefore  of  no  use  to 
the  computing   center .     This  did  demand  the  paper  punch  be 
selected  and  prevented  the  use  of  the  punch  as  an  output 
device.     The   suppression  of  accounting  output  was  accomplished 
by  taking  advantage  of  the  READ/WRITE  subroutine  in  MCS. 
All  I/O  requests  must  be  thru  this  routine  and  this  includes 
any  requests  for  output  to  the  accounting  medium,    normally  the 
paper  punch.     Logical  number  55   is  reserved  for  the  accounting 
medium  and  to  suppress  the  output  a  test  for  logical  55  is  made 
each  time  READ/WRITE  is   entered .     If  the  entry  is  for  any 
logical  number  except  55   the  request  is  processed.     If  the 
request  is  for  logical  55   a  no  action  exit  is  made. 

This  test  is  made  by  adding  the  following  programming  to 
the  READ/WRITE  section  of  MCS  at  approximately  cell   1225. 


INA 

-55 

Test  for  accounting 

AJP        N 

*+3 

Jump  if  not  accounting 

INA 

2 

Build  exit  to  suppress 

SAU 

MRW800 

accounting  output 

SLJ 

MRW800 

Jump  to  exit 
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This   suppresses  the  accounting  output  but  still  allows 
the  paper  tape  punch  to  be  used  as  an  output  medium  if 
desired,     Unless  the  punch  is  to  be  used  as  an  additional 
output  unit  is  need  not  be   selected . 

C.     Loader  Errors  to  the  Operator 

Many  of  the  failures  of  programs  to  run  under  the  COOP 
MONITOR  result  from  errors  detected  by  the   subroutine   LOADER 
in  MCSo     These  errors  cause  messages  to  be  written  on  the 
standard  output  medium  and  this  must  be  listed  off-line  (unless 
the   standard  output  is  an  on-line  printer  )    before  the  operator 
can  determine  the  cause  of  the  error „     To  allow  the  error 
message  to  also  be  output  on  the  comment-to-operator  medium, 
normally  to  the  typewriter,    the  following  programming  was  added 
to  the   subroutine  LOADER  in  MCS  at  approximately  cell  6274  . 


RTJ 

WRITE 

Errors  to  operator 

01 

53 

BCD                              Unit  # 

03 

LERR 

Write/Check             FWA 

00 

LERR+5 

LWA+1 

NOP 

Error  return 

NOP 

Loader  errors  are  now  immediately  available  to  the  computer 
operator  as  the  program  is  being  run  to  assist  in  the  correction 
and  possible  rerun  if  desired . 

Do     Linkage  for  Remote  Display 

The  addition  of  a  I/O  subroutine  for  remote  operation  of 
a  digital  display  unit   (  DD65  )   requires  that  proper  entry  linkages 
be  entered  into  MCS„     This  will  permit  the  driver  to  be  called 
(  if  not  within  the  MCS  )    and  executed.     These  linkages  are 
in  the  Available   Equipment  Table    (AET)    and  the  Available 
Equipment  Driver  Name  Table   (AEDNT)  .     Both  of  these  links 
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have  been  provided  in  the  present.   (  modified  )   version  of  the 
library  tape.     In  addition,  a  reserve  area  of  1000   cells  has  been 
made  available  within  MCS   (  cells   3060  to  4060  )   to  contain 
the  programming  for  the  display  driver 

The  AET  entries   (  in  BOOT  )  are  shown  in  figure   6  and  the 
AEDNT  entries  are  located  at  the  end  of  the    subroutine  LOADER, 
at  approximately  cell   6460  in  MCS.    These  entries  are: 


BCD  DISPLAY 

SEV  3070 

SLJ  HOWLER 


where        SEV  indicates  the  driver  is  within  MCS 

and       3070        is  the  entry  point  address  of  the  driver 


This  link  therefore  requires  the  display  driver  to  have 
its  entry  point  located  at  cell  3070  to  be  executed  properly. 
If  a  new  entry  address  is  desired  it  must  be  entered  into 
the  AEDNT,   the  AET  entry  need  not  be  changed 

The  final  modifications  made  to  the  COOP  MONITOR  system 
were  the  addition  of  two  subroutines  to  the  library  tape.,    These 
subroutines  were:   1„   Grafplot,   to  allow  a  graph  of  any  two 
designated  arrays  to  be  drawn  on  an  incremental  plotter,    see 
section  4.1.     2      UCSD,    a  new  Secondary  Control  System 
written  by  the  University  of  California  at  San  Diego  f    which 
allows  the  use  of  simple  control  cards  for  running   "  stacked 
job"   input  for  compile  and  execution . 

3 .  6     Specifications  for  Further  Modifications 

The  modified  version  of  COOP  MONITOR  is  now  ready  for 
the  next  step  in  the  development    of    an  operating  remote   station 
capability.     This  is  the  programming  and  insertion  into  MCS 
of  a  remote  station  display   (  DD65  )    drivei ,    the  alteration  of 
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the   system   interrupt  handler   (SELECT,    REMOVE,    DETECT)    to 
allow  remote   station  interrupts   and  a   subroutine    to  display 
graphical  information  on  the  remote  display.      The   specifications 
for  these  three  modifications  are  discussed  in  the  following 
sub-sections: 

A.     Remote   Display  Driver 

This   subroutine  would  allow  the  display  to  function  as 
the  comment-to-operator  medium ,    normally  the  console 
typewriter .     One  of  the   subroutines  for  this  driver  has  been 
completed  and  is  fully  described  in  section  4   2    "line  printer 
simulator"  .     This   subroutine  will  produce  a  line  by  line 
display  on  the  console   (  DD65  )  ,    that  will  move  upward  with 
the  arrival  of  each  new  line,    like  a  typewriter      Only  the  upper 
half  of  the  tube  face   should  be  used  for  the    "line  printer" 
to  allow  the  lower  half  to  be  used  as  a   "status  board"   for 
computer  input  or  output  assignments  and  any  special 
information  for  the  remote   station  operator. 

To  correctly  process  input/output  requests  from  COOP 
MONITOR  (  from  READ/WRITE  )    the  remote  display  driver  must 
accept  the   standard  calling   sequence  and  correctly  respond  to 
the  parameters   specified  .     The   specifications  for  the   standard 
calling   sequence  is  now  given  in  the  COOP  MONITOR 
format: 

TITLE:  DISPLAY 

PURPOSE:  To  input  from  or  output  to  the  remote  station 
display  (  DD65  )  in  a  format  compatible  with 
the  COOP  MONITOR . 
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USAGE:  Calling   Sequence; 


ENA 

Location  interrupt  routine 

L 

RTJ 

DISPLAY 

R.M. 

E..C. 

L+l 

F.C. 

A 

I 

B 

L+2 

Alternate  Return   (  error  ) 
E 

L+3 

Normal  Return 

R.M.=  Recording   Mode,    1   if  format  is   BCD  8   char/ word 

2  if  format  is   8  typ„    char/ word 

3  if  format  is    .1   typ.    char/ word 

BCD  8   char/word;   implies  the   internal  format  is   BCD  with 
blanks  replacing   typewriter  characters  for  which  there   is 
no  BCD  equivalent. 

8  typ.    char/word;   implies  the  internal  format  is   8  typewriter 
characters  per  word, 

1  typ.    char/word;   implies  the  internal  format  is    1  typewriter 
character  per  word. 

E.C.=  Equipment  Code   with  format     CRXX 
C=  Channel  number  (  7  for  display  ) 
R=   1   for  input,    0   for  output 
X=  Not  interpreted 

1=  Interrupt  Selection 

1=  With  interrupt,    use  the  address   in  the  A  register 
0=  No  interrupt,    ignore  the  address  in  the  A  register 
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F.C.=  Function  Code   explained  below. 

A,    B,    E  =  Detailed  under  each  function  code. 

Functions:     In  all  cases   if  a   parameter  error  is   encountered 
E  is   set  equal  to  0   and  control  is   transferred  to  the  alternate 
return.     Parameter  errors  are   such  things  as   channel   not   equal 
to   7,    R  not  equal  to  0   or   1,    incorrect  function  codes,    etc 
E  is  always   set  to  reflect  the  case  in  which  the  typewriter 
(simulated  by  the   display)    is   left.     This   has   no  meaning  for 
the  display  but  the  correct  response  if  necessary  for  COOP 
MONITOR.     The   2      bit  of  E   is    set  to    1   for  upper  case. 

F.C.=1 

Starts  transmission  of  data  to  or  from  an  area   specified 
by  the  first  address    (A)    and  the   last  address  plus   1  (B).    In 
some  cases  a  conversion  and/or  packing/unpacking  operation 
is  required  by  the  recording  mode . 
For  input,    R.M.=1  (BCD   8/wd  ) 

Keyboard  input  with  no  interrupt  on  carriage  return  is   selected, 
Characters  are  packed  eight  per  word  until  the  area  from  A  to 
B-l   is  filled  or  carriage  return  is   sensed,     If  carriage  return 
is   sensed  fill  out  the  last  word  with  blanks  if  necessary. 
Interrupt  on  carriage  return  is   selected  and  an  exit  made  with 
the  number  of  words  read  in  the  A  register. 
R.M   =2    (  Typ   8/wd) 

This  mode  is  the   same  as  R.M.=1,    except  the  BCD  code 
from  the  display  must  be  converted  to  typewriter  characters. 
R.M. =3    (  Typ    1/wd) 

The  characters  are  read,    converted  to  typewriter  code,    and 
stored  one  per  word  in  area  A  to  B-l.     Interrupt  on  carriage 
return  remains   selected. 
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For  output ,    RoM.=l    (  BCD  8/wd  ) 

The   information  from  A  to  B-l   is   packed  into  the  proper 
format  for  the  display  and  output.     If  the  message  overflows 
a  three  line  buffer   (  186  characters  )    the  overflow  is  lost. 
R.M.=2    (  Typ   8/wd  ) 
The   information  from  A  to  B-l    is   converted  to  BCD  and 
packed  into  the  display  format  and  output 
R.M.=3    (  Typ   1/wd) 
Same  as   R„M.=2   above . 

F.C.=2     Check  only 

Control  is  returned  with  the   number  of  words  transmitted 
by  the  last  read   (  R=l  )    or  write   (  R=0  )  operation,      This 
function  if  needed  to  satisfy  MCS  which  assumes   some  of 
the  transmissions  are  buffered  and  therefore  it  must  return  to 
the  driver  a   second  time  to  determine  the  number  of  words 
"buffered". 

F.C.=3     Read/Write  with  checking 

Same  as  the  operation  for  F.C.=1,    with  the  number  of 
words  processed  entered  in  the  A  register  before  returning,, 

F.C.=4     Sense  Equipment  Ready 

Determine  if  the  display  is   in  a   "ready"    status,    if  it  is 
not  ready  set  E  to  1   and  use  the  alternate  return       If  it  is 
ready   set  E  to  indicate  the  current  status  for  the   "case"   and 
use  the  normal  return  . 

The   present  COOP  MONITOR  does  not  use  any  of  the 
provisions  incorporated  for  F.C.   greater  than  4       The  driver 
routine  need  only  check  that  the  function  code  is  within  the 
range   1   to  4,     If  not  set  E=0    (  parameter  error  )    and  use  the 
alternate  return. 
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B.     Coop  Monitor  Interrupt   Package 

Before  any  great  amount  of  programming  can  be  done  to 
adapt  COOP  MONITOR  for  remote  operation,    the  present 
interrupt  package   (  Select ,    Detect,    and  Remove  )    must  be 
modified       This   subroutine  can  presently   select  and  sense 
interrupts  on  channels   1   thru  6   inactive  and  all  internal 
interrupts       It  cannot   select  or  sense   satellite  generated 
interrupts  on  channels   3/4  or  5/6  via  the  CDC   1607  magnetic 
tape  units,    nor  can  it   select  or  sense  any  channel  7  interrupt, 

The   calling   sequence  for  the  interrupt  subroutine,    see 
refo    10,    uses  the  integers   1   thru   12   to  set  the  type  of 
interrupt  to  be   selected  and  sensed.     The  integers   1   thru  8 
are  used  for  those  interrupts  to  be  removed  „     These  calling 
parameters  need  to  be  increased  to  provide  the  following 
additional  options « 

For  Select: 

Type  Interrupt  Action 

13  Select  program  control  for  channel   3/4 

14  Select  program  control  for  channel  5/6 

15  Interrupt  on  keyboard   1   hit   (  DD65  ) 

16  Interrupt  on  keyboard  2   hit   (  DD65  ) 

17  Interrupt  on  radar  target  hit   (  DD65  ) 

For  Remove: 

To  avoid  confusion  use  the   same  parameters  to  remove 
the  above   selections 

Before  any  of  these  changes  are  attempted  the  precautions 
necessary  for  programming  an  interrupt  package,    discussed 
in  refu  13,    must  be  carefully  considered 

Along  with  these  modifications  to  the  interrupt  subroutine, 
the  main  frame  of  the  computer  should  be  modified  to  allow 
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computer   selection  of  interrupt   lockout       This   would   avoid 
the  present  procedure   of   selecting   interrupt  on  arithmetic 
fault  and  then  forcing   a  fault  just  to  place   the   computer  in 
lockout  mode.     There   is  just   such  a  routine   in  MCS   (  RLOKOUT  ) 
to  perform  this  function       This  takes   20   instructions  to 
accomplish  what  could  be  done  with  one.     These  modifications 
would  be   similar  to  those   described  in   section  4.4  to  provide 
computer  selection  of  remote  indicator  lights. 

Co     Data  Display  Graph  Plot  Routine 

The  incremental  graph  plotting   system  has  been  operational 
for  approximately  six  months ,    see   section  4  „  1  „     A  routine 
to  provide  this  graph  plot  capability  utilizing  the  Data  Display 
unit   (  DD65  )r    still  needs  to  be  completed „     The  following 
specifications  and   suggestions   should  provide  an  outline 
for  incorporating  this   "Graph  Display" . 

1.  Use  the  author's   scaling  routine  to  scale  to  units  per  inch. 

2.  Use  this   scale  and  16  increments  per  inch  vice  the    100 
per  inch  used  in  the  incremental  system  to  build  a   scaled 
integer  array  of  coordinate  points. 

3.  Output  the  axis,   titling,    and  labeling  data  using   the 
standard   "Grafplot"   technique. 

4o     Curve  drawing  requires  extensive  use  of  the   string 
capability  of  the  display  in  order  to  provide  for  multiple 
curve  graphs.     This  is  due  to  the  relatively  small,    1024  cell 
24  bit,    memory  of  the  data  display. 

5.     Memory  allocation  in  the  DD65   Display   should  be  about 
as  follows: 

a.     Vertical  and  Horizontal  Axis,    8  inches  long.     Use 

vector  size   64/line.     Requires  40  cells. 
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bo     Labels,    4   DD65   words/label .      18   labels  requires 

72    cells 

Co     Titles,    A  minimum  of  about  200   cells 

d.     Curves,    Total  memory  usage  of  above  is  312   cells, 

This   leaves   714   cells  for  curves       Using   the   string 

vector  mode  this  will  provide   storage  for  approximately 

2500  vectors. 

6       Using   only  the   smallest  vectors  this  will   provide  for 
approximately  20  traverses  of  the  display  tube       Assuming 
that  an  average  curve  traverses  the  tube  4   times,    it  appears 
that  5   curves  may  be  displayed  simultaneously. 

Besides  an  on-line  graph  display  routine,    another  routine 
which  is  very  desirable  would  provide  an  off-line  display 
of  the  graphs   which  were   output  by  the   CDC    1604   program 
for  "hard  copy"    incremental  plotting. 
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4   0      SYSTEM  ROUTINES 

Several  system  routines  were  written  for  both  the  Fortran  60 
System  and  the  Coop  Monitor  System.    Four  of  these   routines, 
which  were  developed,    shall  now  be  discussed. 

4.1     Grafplot  Routines 

The  1604  Grafplot  Routine,  see  enclouse3  ,     was  written  for 
the  CDC  1604  computer      It  generates  a  magnetic  tape  output  in 
the  format  required  to  drive  the  160A  Grafplot  Routine,    see 
enclosure  2 .      A  version  of  the  160A  routine  was  written  for  the 
160  computer,  see  enclosure  1.     It  bypasses  the  interpolation 
option  in  order  to  operate  in  the  smaller  memory  of  the  160  computer. 

This  system  will  produce  multiple  curved  graphs,  each  curve 
is  limited  to  a  maximum  of  900  points.     Optional  auto-scaling 
of  data  points,  titling  and  curve  labeling  is  available.     Figure 
7    is  a    general  flow  diagram  of  the  1604  Grafplot  routine.  Copies 
of  the  coding  for  these  routines  are  available  from  the  CDC  DATA 
CENTER,  PALO  ALTO,  CALIFORNIA    or  from  the  U.S.N.  Postgraduate 
School  Computing  Center. 

Two  original  techniques  where  developed  which  are  of  interest. 
They  are  the  quantized  scaling  iterative  procedure  used  in  the  1604 
program  and  the  "decision  rule"  algorithm  for  providing  "best  fit" 
motion  commands  to  an  incremental  plotter  „ 

The  scaling  technique  assumes  a  scale,  tests  for  fit,  then 
iterates  to  the  next  quantized  scale  and  test  again  until  the  opti- 
mum available  scale  is  found. 

The  two  point  connector  algorithm,   "LINE"  ,    computes  the 
code  string  required  to  move  the  pen  of  a  digital  incremental  X,Y 
plotter  from  an  initial  point  (XI,  Yl  )  to  a  terminal  point  (  X2 ,  Y2  ) 
by  the  "best  fit"  approximation  to  the  straight  line  between  the 
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points.     The  permitted  elemental  pen  movement    is  to  an  adjacent 
point  in  a  plane  Cartesian  point  lattice,    diagonal  moves  are 
permitted.     The  approximation  is  "best  fit"    in  the  sense  that  the 
deviation  of  the  generated  line  from  the  true  straight  line  never 
exceeds  one  half  an  increment.    This  is  physically  the  best  fit 
possible  within  the  movement  constraints  imposed,, 

As  an  example  of  the  LINE  program,  assume  it  is  required  to 
increment  a  pen's  position  with  minimum  deviation,  along  a 
straight  line  connecting  point  1  and  point  2C      The  movement  codes 
for  the  CalComp  Plotter  are  as  follows; 

Pt  2 


Pt  1 


Executing  the  LINE  program,  the  following  values  are  found; 

A  =  5 

B  =  3 

NRLONG  =  5 

NRSHORT  =  3 

MOSTLY  =  1 

IBOTH  =  5 
and  the  iteration  scheme  produces  the  incremental  path  shown. 
Note,  in  the  following  fortran  program  ,  LINE,   a  subroutine 
is  required  to  output  the  movement  codes  from  the  user's  particular 
computer  to  the  incremental  plotter.    Thus  subroutine  "PLOT  (  MOVE  )" 
would  output  the  movement  code  "MOVE"  to  the  plotter.      For  the 
CalComp  Plotter  the  NCODE  instructions  may  be  deleted,   since 
the  routine  is  written  to  require  no  code  conversion  for  this 
equipment , 
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PROGRAM  LINE  (  XI , 
DIMENSION  NCODE 


100 

200 

300 
400 

500 

600 
700 
800 


900 
1000 


1100 
1200 

1300 


1400 
1500 


NCODE 

NCODE 

NCODE 

NCODE 

NCODE 

NCODE 

NCODE 

NCODE 

A  =  X2 

B  =  Y2 


( 1  )  =  "use 

(2)  = 

(4)  = 

(5)  = 

(6)  = 

(8)  = 

(9)  = 

(10)  = 

-  XI 

-  Yl 


Yl ,  X2  ,  Y2  ) 

(10) 
+X    movement  code" 
-X 
+Y 
+X+Y 
-X+Y 
-Y 

+X-Y 
-X-Y 


400 


1500,1500,700 
800,  900,900 


IF  (  A  )  200,100,100 

ICODE  =  1 

Go  To  300 

A  =  -  A 

ICODE  =  2 

IF  (  B  )  500,400 

JCODE  =  4 

Go  To  600 

B  =  -  B 

JCODE  =  8 

IF  (  A  +  B  ) 

IF  (  A  -  B  ) 

MOSTLY  =  JCODE 

NRLONG  =  B 

NRSHORT  =  A 

Go  To  1000 

MOSTLY  =  ICODE 

NRLONG  =  A 

NRSHORT  =  B 

IBOTH  =  ICODE  +  JCODE 

LIMIT  =  NRLONG 

NSWITCH  =  NRSHORT 

MOSTLY  =  NCODE  (  MOSTLY  ) 

IBOTH  =  NCODE  (  IBOTH  ) 

IF  (  NRLONG  -  NSWITCH  -  NSWITCH)  1200,1400,1400 

MOVE  =  IBOTH 

NSWITCH  =  NSWITCH  -  NRLONG  +  NRSHORT 

CALL  PLOT  (  MOVE  ) 

LIMIT  =  LIMIT  -  1 

IF  (  LIMIT)  1500,1500,1100 

MOVE  =  MOSTLY 

NSWITCH  =  NSWITCH  +  NRSHORT 

Go  To  1300 

END 

END 
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4  . 2      Data  Display  "Line  Printer  Simulator" 

The  "line  printer  simulator"  program  demonstrates  a  very 
effective  method  of  providing  a  continuous  page  listing  ability. 
The  problem  was  to  display  one  full  page  of  data  on  the  Data 
Display  Incorporated,  Model  65,  console „    The  data  displayed 
was  to  be  updated  one  line  at  a  time  by  over-writing  an  old 
line  of  data  in  the  DD65's  memory.    It  was  desired  that  this 
new  line  entry  always  occur  at  the  bottom  of  the  page  and  all 
other  lines  would  precess  up  the  page  and  finally  disappear. 
An  effective  method  to  provide  this  listing  ability  was  programmed 
and  added  to  the  Fortran  60  System.    An  understanding  of  this 
program  requires  a  familiarity  with  the  word  format  used  to  up- 
date the  DD65 .    The  DD65  has  the  following  characteristics; 

a.      It  has  two  keyboards  which  can  be  used  only  as  output 
mediums  to  a  computer .     There  is  no  connection  or  internal 
logic  for  providing  tube  display  of  a  character  when  it's 
corresponding  key  is  hit.    This  is  different  from  a  conventional 
typewriter,  which  prints  it's  character  automatically  when  a 
key  is  hit.    In  order  to  display  the  character,  it  must,  be  read 
by  a  computer,  processed  and  the  appropriate  word  format  must 
be  transmitted  back  to  the  display.    The  display  logic  then 
decodes  the  format  of  the  words  transmitted  to  its  memory  and 
displays  the  appropriate  character/characters.    There  is  no 
provision  for  read  out  from  the  DD65  memory  by  a  computer. 
The  memory  serves  only  to  store  the  data  for  display  upon  the 
cathode  ray  tubes.    The  logic  cabinet  of  the  display  unit  contains 
the  circuitry  required  to  scan  its  memory  and  display  the  contents 
onto  the  cathode  ray  tubes . 


57 


b  To  read  from  a  display  keyboard,  requires  that  a  sequence 
of  external  function  codes  (  see  fig.  #  9  )  must  be  executed  to 
sense  keyboard  hit,  select  keyboard  for  input  to  the  computer, 
then  input  one  word  via  channel  7 .  The  BCD  code  for  the  key 
read-in  will  be  the  lowest  6  bits  for  keyboard  1  characters  and 
the  lowest  9  bits  if  keyboard  2  was  read„  The  process  of  reading 
the  key  into  the  computer    releases  the  key  at  the  DD65  console. 

Co      Output  to  the  display  maybe  either  characters  or  vectors. 
There  are  three  sizes  of  characters,  32,  64,  or  128  per  line. 
There  are  two  sizes  of  vectors,  64  or  128  per  line.    The  line 
mentioned  is  the  width  of  the  tube  display  area ,  approximately 
8.5  inches  square. 

do      A  selection  of  either  character  or  vector  mode,  a  memory 
storage  address,  the  X/  Y  display  position,  and  a  tube  selection 
are  all  data  which  is  conveyed  to  the  display,     The  word  which 
contains  this  information  is  called  a  designator  word,  see  figure 
#  8.      This  designator  word  can  also  carry  two  characters  or 
vectors,  depending  on  the  mode  selected.    Additional  characters 
or  vectors  can  be  transmitted  after  the  designator  word,  if  packed 
in  a  format  called  "string  word  format"  ,  see  figure  #  8.      These 
"string"  word  characters  or  vectors  will  be  positioned  relative 
to  their  preceding  designator  word.    Thus  it  is  the  designator  word 
that  controls  the  tube  location  where  the  character/vector  string 
will  appear.    For  additional  display  information,  see  reference  #19, 
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The  line  printer  routine  provides  for  displaying  32  lines 
of  data.     This  requires  that  32  designator  words,  each  followed 
by  a  line  of  data,  be  stored  in  the  DD65  memory.    Once  the 
data  was  in  the  DD65  memory,  it  was  only  necessary  to  selec- 
tively transmit  new  designator  words  with  the  appropriate  new 
Y  position  indicators  to  move  the  whole  line's  position.    Thus 
once  the  line  data  has  been  output,  the  1604  is  not  required  to 
retain  an  image  of  the  page  data  in  its  memory,  nor  need  any 
time  be  wasted  in  re-transmitting  redundant  information  to  the 
display. 

The  technique  employed  required  that  a  32  word  designator 
table  be  constructed „    This  table  provided  memory  addresses 
for  data  storage  from  cells  600  thru  cell  1777  in  the  DD65  memory. 
Note,  the  DD65  memory  cells  are  only  24  bits  long,  the  dis- 
assembly from  the  1604  computer's  48  bit  word  format  is  automatic 
in  the  DD65  logic.    Note  also  that  equipment  limitations  dis- 
allow addressing  odd  numbered  memory  locations  in  the  DD65. 
The  designator  table  also  provides  32  discrete,  equally  spaced 
vertical  "Y"  axis    locations   to  provide  seperation  between  the 
lines  to  be  displayed „ 

The  method  of  up-dating  the  page  displayed  requires  that 
all  the  "Y"  locators  in  the  designator  words  be  incremented 
vertically  one    line  space  (  20  units  ) .    A  mask  search  is  then 
executed  to  locate  the  designator  word  which  contains  the  "Y" 
locator  for  the  bottom  line  entry  to  the  page.    This  "Y"  locator 
is  400.    Once  found,  the  designator  word  is  stored  in  the  out- 
put buffer.    Then  the  designator  table  is  transmitted  to  the  DD65, 
thus  sweeping  all  lines  vertically  one  space.    The  new  line 
is  packed  into  the  output  buffer.    This  buffer  now  contains  a 
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designator  word  followed  by  a  line  of  string  words .     These  are  now 
output  via  channel  7  to  the  display's  memory  <     Ncre  the  channel  7 
input  /  output  instructions  transmit  words,  from  the  1604  memory 
in  reverse  sequence  compared  to  the  normal  buffer  channels . 
This  requires  an  inverse  packing  order  when  packing  the  buffer 
for  output  on  channel  7 

This  line  printer  technique  has  also  been  incorporated  into 
a  typewriter  page  simulator  for  the  right  tube  of  the  display. 
Both  systems  are  working  well. 

See  appendix  IV  for  the  resident  coding  required  for  the 
line  printer  package.    It  required  only  77  cells  including  the 
designator  table  and  a  10  cell  output  buffer      The  designator 
table  is  listed  in  the  appendix  IV,  page  #  6. 
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CHANNEL  7   OUTPUT  FORMAT  for   DD65    DATA  DISPLAY 
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Figure  8 
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DATA  DISPLAY  CONSOLE 


MODEL  65    "EXTERNAL  FUNCTION  CODES" 
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10  December  1962 


SELECT  CODES 


FUNCTION 


Select  Keyboard  1  for  Input 

Keyboard  2  for  Input 
Select  Track  Ball  "X" 

Track  Ball  "Y" 
Select  Range  Switch 
Select  160  Status  Response 
Select  Memory  Update 1 

from  l6ob 

from  160 
Select  Radar  Target  Data! 

to  160U 

to  160 

to  Auxiliary  Equip. 
Select  Interrupt  on$ 

Keyboard  1  Key  Hit 

Keyboard  2  Key  Hit 

Radar  Pulse  Hit 
Release  Interrupt  Request 
Remove  All  Interrupt  Selects 


Select 
160U 

Code 
160 

1C711+0 

71^0 

C7120 

7120 

C7102 

7102 

C710U 

710U 
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7110 
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7001 
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(7105) 
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(7103) 

071^1 

(71^1) 
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(7111) 

C7121 

(7121) 

Computer  Input  Word 
Bit  Format 


000000FFFFFF 
OOOVWFFFFFF 
OOOXXXXXXXXX 
OOOYYYYYYYYY 
000000000RRR 


Notes  1.  "C"  Indicates  IcO1*-  data  channel  number «  (Normally,  C=7) 
=====  2.  (  )  Indicates  code  disabled  selectively  on  ' ' 160  or  160U 
ONLY*  *  mode  switch  position 

Figure  9a 
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SENSE  CODES 


CONDITION 


Keyboard  1  Hit 
Keyboard  2  Hit 
Keyboard  1  NOT  Hit 
Keyboard  2  NOT  Hit 
Tab  Hit 
Tab  NOT  Hit 
Carriage  Return  Hit 
Carriage  Return  NOT  Hit 
Keyboard  1  Selected 
Keyboard  2  Selected 
Keyboard  1  NOT  Selected 
Keyboard  2  NOT  Selected 
NOT  DD-65  Interrupt 
DD-65  from  160  Selected 
DD-65  from  160U  Selected 
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Figure  9b 
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4o3      Merg  Sort 

The  SORT  Routine,   see  appendix  III f    was  written  to  improve 
the  effeciency  and  reliability  of  sorting  using  the  1604  computer 
vice  the  IBM  mechanical  card  sorter.    Another  motivation  was  to 
provide  the  capability  of  sorting  120  character  records  which 
could  not  be  easily  sorted  using  80  character  cards 

The  SORT  Routine  can  sort  on  variable  length  column  fields 
from  1  to  120  columns „    The  present  routine  divides  the  field  to 
be  sorted  into  7  character  fields ,  then  multiple  entries  are  made 
to  a  subroutine,  SORT7 ,  which  actually  performs  the  sorting 
operation .      SORT7  divides  the  computer's  memory  into  three 
equal  bins,  ABIN,  BBIN,  and  CBIN.    These  are  each  20,000 
octal  cells  long,     SORT7  requires  an  input  tape  written  in  120 
character  records  with  an  "End  of  File  Mark"  terminating  the  file 
to  be  sorted.     Upon  entry  to  SORT7 ,  one  of  its  subroutines,  Alsinp, 
reads  1000  octal  cards  into  ABIN.    As  each  card  is  read,  a  sorting 
key  is  formed  from  the  column  field  designated  and  this  key  is 
stored  in  the  cell  preceeding  the  input  record  image  from  which  it 
was  generated.    The  key  occupies  one  cell,  the  record  image 
occupies  17  octal  cells,  thus  each  input  record  requires  20  octal 
memory  cells.    Multiply  20  octal  by  1000  octal  to  obtain  the 
arbitrary  20,000  octal  bin  size  which  was  choosen  as  the  basic 
block  size.    Alsinp  always  checks  for  an  E.O.F.  mark  and  sets  a 
flag  to  signal  the  rest  of  the  routine  that  the  last  block  has  been 
read.    After  Alsinp  has  read  1000  octal  records  or  encountered  an 
E.O.Fo  mark,  then  an  entry  is  made  to  a  subroutine,  Rlhmerg, 
which  performs  an  internal  merg  sort  by  oscillating  between  ABIN 
and  BBIN,  sorting  on  the  keys.    The  internal  merg  sort  terminates 
with  the  sorted  block  in  CBIN.    If  this  was  the  first  block,  it  is 
immediately  written  onto  one  of  the  two  scratch  tapes  and  Alsinp 
inputs  another  blocks    If  this  was  not  the  first  block,  then  a 
subroutine ,  Hexsort ,  is  entered  to  perform  a  merg  of  the  new  block 
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into  the  file  of  previously  sorted  blocks  which  are  accumulated 
externally  on  a  scratch  tape.    This  cycle  continues  until  an 
E.O.F.  is  encountered,  then  after  the  external  merg  is  complete, 
the  scratch  tape  is  rewound  and  a  subroutine,  Kremkey,  reads 
in  the  ordered  blocks  from  the  scratch  tape,  removes  the  keys 
and  writes  out  the  output  file  in  an  ordered,  120  character  record 
length  file. 

If  additional  fields  remain  to  be  sorted,  this  output  file  is 
designated  the  input  and  another  entry  is  made  to  SORT7  with 
the  new  character  field's  initial  and  last  column  numbers  as 
arguments .    This  procedure  continues  until  the  total  sort  field 
is  in  order    and  listed  on  the  output.    The  output  is  then  re- 
wound to  lockout  and  the  operator  is  informed  that  the  job  is 
finished. 

Several  improvements  to  this  routine  are  suggested. 

a.  Build  and  sort  on  a  two  cell  key,  if  large  fields  are 

to  be  sorted  frequently.    This  would  provide  a  better  balance 
between  the  internal  sorting  time  and  the  external  tape 
handling  time. 

b.  Provide  for  sorting  on  split  fields,  ie.  non-consecutive 
column  fields .     This  could  be  provided  by  forming 

the  sort  key  piece-wise  from  specific  columns  , 

c„      Use  a  double  entry  key  /  key  location  table  for  performing 
the  internal  sorto    This  would  eliminate  the  necessity  of  carrying 
the  input  record  image  around  with  the  key  each  time  the  key 
order  is  changed,     The  sort  could  be  performed  by  ordering  only 
the  keys  and  maintaining  correspondence  in  the  key  location 
table  as  the  keys  are  sorted.    This  key  location  table  could  then 
be  used  to  perform  the  internal  ordering  of  the  input  record  images 
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This  scheme  would  improve  the  internal  sorting  speed  and 
reliability  since  it  would  require  fewer  internal  data  transfers . 

d.       The  last  and  probably  the  most  significant  improvement 
which  is  indicated,  would  be  to  utilize  two  more  scratch  tapes. 
This  would  improve  the  sort  routine  speed  by  nearly  50% „    This 
is  due  to  the  rewind  time  required  by  the  tape  drives  and  their 
inability  to  read  in  the  reverse  direction.    At  present,  much 
time  is  wasted  waiting  on  the  two  scratch  tapes  to  rewind  in 
order  that  the  next  internal  block  can  be  merged  with    the 
external  ordered  f ile .    A  suggested  method  to  improve  the 
external  sort  would  be  to  alternate  the  merging  of  the  internal 
block  between  to  sets  of  scratch  tapes  similar  to  the  set 
presently  employed.    This  would  increase  the  rewind  time 
available  for  each  set  and  thus  decrease  the  idle  time  mentioned 
previously.      After  Hexsort  has  finished  merging  the  last  block , 
then  Kremkey  would  have  to  operate  differently  than  at  present. 
Kremkey  would  have  to  read  one  block  from  the  ordered  tape 
of  each  scratch  tape  set,  then  perform  a  final  merg  comparison 
similar  to  the  Hexsort  merg  routine.    Instead  of  forming  an 
ordered  list  in  memory,  this  final  merg  could  be  written  out 
as  the  final  ordered,  120  character  listable  output      Before 
any  other  modification  is  considered,  this  last  suggestion  should 
be  given  priorty  "one".    At  present  it  remains  a  gross  deficiency 
against  high  speed  soiling  using  this  routine 
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4  ■  4      Satellite  System  Programming 

There  are  two  basic  operations  necessary  to  establish  an 
adequate  satellite  system.    These  are  the  ability  to  exchange 
data  and  to  selectively  execute  a  pre-stored  program  when 
directed  by  another  member  of  the  satellite  system ,    The 
present  installation  proposed  to  couple  the  CDC  160  to  the 
CDC  1604  Computer      The  CDC  160  Computer  does  not  provide  an 
interrupt  mode,  therefore  only  the  1604  interrupt  mode  was 
available  to  be  employed, 

The  desirable  characteristics  of  the  basic  1604  satellite 
interrupt  program  are: 

a       Reliability 
bo      Flexibility 

c.  Speed 

d.  Effective  Employment  of  the  Communication  Flags 
e„      Minimize  Memory  Requirements 

The  problems  encountered  in  designing  the  basic  1604 
interrupt  routine  shall  now  be  discussed =    The  1604  Computer 
is  unable  to  prevent  the  160  Computer  from  entering  the  inter- 
rupt auxiliary  routine  which  is  wired  into  the  1604  „    For  this 
reason,  a  protective  "lock-out"  scheme  was  required  to  prevent 
interference  with  the  1604  equipment  handling  routines  . 
Specifically,  there  exists  a  critical  time  interval  between 
equipment  selection  and  activation  during  which  an  interrupt  from 
a  satellite  station  would  be  disastrous  to  the  main  program . 
The  technique  develope  to  prevent  this,  is  as  follows:    All 
1604  equipment  handling  routines  were  modified  to  turn  on 
communication  flag  I  (see  ref .  #  2  )  in    advance  of  any  equip- 
ment selection.    Communication  flag  I  is  then  cleared  after 
the  selected  equipment  is  activated  .    Using  this  scheme  it  is 
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then  required  that  the  160  satellite  computer  inspect  communication 
flag  I  prior  to  executing  an  interrupt.    If  flag  1  is  set,  then  the 
160  computer  enters  a  "wait  loop"  until  flag  1.  is  cleared  by  the 
1604  Computer.    Thus  through  the  use  of  communication  flag  J, 
the  1604  computer  is, in  effect,  capable    of  "locking  out"  the 
160  satellite  computer  from  an  interrupt  request      This  was  a 
desirable  feature  rot  presently  provided  in  the  hardware  design. 

The  next  problem  in  the  design  of  the  interrupt  routine  was 
how  to  indicate  to  the  1604  computer,  the  nat  re  of  the  "ask 
requested  by  the  160  computer.    The  method  used  requires  that 
each  interrupt  shall  immediaty  trigger    a  ,    48  bit  word  ,  data 
transfer  to  the  1604.    The  format  of  this  word,  designated  as 
the  "control  word",  is  outlined  in  detail  in  figure  #  12      After 
receiving  this  "control  word"  the  1604   interprets  the  operation 
to  be  performed.    There  are  four  tasks  which  car.,  be  directed  by 
the  control  word,  they  are: 

1„      1604  INPUT  DATA  BLOCK 

2  .      1604  OUTPUT  DATA  BLOCK 

3.  PACK  ARGUMENT  ADDRESSES  INTO  A  SUBROUTINE 
AND  THEN  EXECUTE  THAT  SUBROUTINE. 

4.  LOAD  "A"  REGISTER  WITH  A  21  BIT  ARGUMENT 
FROM  THE  CONTROL  WORD  AND  THEN  RETURN 
JUMP  TO  EXECUTE  THE  SUBROUTINE. 

A  flow  diagram  of  this  1604  satellite  interrupt  routine  is  provided 

in  figure  #  11. 

One  additional  problem  remains  to  be  discussed,  that  is 
storage  allocation  for  the  programming  required  by  the  satellite 
system.    This  was  acquired  by  setting  the  resident  bias  level 
on  the  Fortran  60  System  to  5000  octal,  vice  the  normal  4000. 
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FIGURE     12 


This  provided  the  memory  space  needed  to  store  the  satellite 
programming  plus  an  additional  "buffer"  area  for  receiving 
transient  subroutines  from  the  160  computer.    These  subroutines 
may  the  be  executed  by  an  interrupt  entry  to  the  1604  computer 
via  the  satellite  interrupt  system. 

The  use  of  the  160  as  a  satellite  station  requires  that 
the  modified  library  tape,  FORTSAT,  be  in  use  by  the  1604 
computer.      Also,  the  1604  must  be  operating  under  monitor 
control  in  order  to  utilize  a  remote  monitor  process  routine 
which  was  developed  by  the  authors'  (  see  ref    #  22  )  .    The 
physical  seperation  of  the  satellite  160  computer  station  required 
some  means  of  sensing  the  above  conditions  at  the  remote 
station.    Visual  indicators  were  selected  as  the  best,  method 
of  implementing  the  required    status  sensors .    The  console 
of  the  160     Computer    contains    many    unused    indicator  lights , 
two  ot  these  were  selected  to  be  used  as  status  indicators. 
The  first  light,  designated  #  1  or  FORTSAT,  is  a  blue-green 
background  field  light  at  the  left  end  of  the  "P"  register.    The 
second  light ,  designated  #  2  or  MONITOR,  is  the  next  blue- 
green  background  field  light  to  the  right  of  the  #  1  light. 

Manual  control  of  these  lights  at  the  console  of  the  1604, 
was  considered  an  unnecessary  burden  to  the  operator.    Computer 
selection  would  be  more  convenient  and  the  status  indications 
more  current  in  the  reflection  of  the  actual  status  of  the  1604 
Computer  operations,, 
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To  enable  computer  control  of  the  indicator  lights,  two  new 
select  codes  (  on  -  off  pairs  )  for  the  1604  were  required ■    As 
all  -satellite  selects  are  made  in  the  1607  Magentic  Tape  Logic 
Cabinets,  modification  of  these  limits  was  necessary .    This 
modification  would  allow  the  1607  to  accept  and  decode  the  new 
indicator  light  codes  ,    The  two  codes  selected  were; 

LIGHT  #  1        (FORTSAT)        "ON"         S3511 

"OFF"        63511 

LIGHT  #  2        (MONITOR)       "ON"       53544 

"OFF"       63544 
The  select  code  format  is  as  follows: 

First  digit ;  Channel  number 

Second  digit;  Cabinet  number 

Third  digit ;  Group  code ,  5  for  satellite 

Fourth  &  Fifth;  Condition  code 

The  two  codes  selected  for  the  indicator  lights  contain  the 
false  cabinet  number  3»      This  was  necessary  because  the 
1607  (  cabinet  #  2  )  does  not  uniquely  decode  the  last  two 
digits  of  any  select  code .    Therefore ,"  to  prevent  interference 
with  any  of  the  existing  codes,  a  false  3  was  used, 

To  avoid  the  need  for  manual  selection  of  "program  control" 
mode  of  operation  for  the  1607  Tape  Cabinets  /when  enabling  the 
satellite  station*,    this  selection  was  wired  to  be  controlled  by 
light  #  1  and  the  master  clear  switch.     Initial  turn  on  of  light  #  1 
selects  "program  control"  and  the  Master  Clear  disables  both 
lights  and  removes  the  program  control  selection „      The  logic 
diagrams  for  the  modificiations  made  to  the  1607  lape  Cabinets 
are  shown  by  figure  #  13.    Two  relays  were  added  to  the  160 
to  provide  switching  of  the  two  lights  provided, 
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APPENDIX  I 

LIBEDIT      PROCEDURE 

There  are  two  publications  available  to  assist  a  user 
of  COOP  MONITOR  in  performing   a   successful  library 
preparation  or  modification.     These  are  ref.17   and   10„     The 
following  was  obtained  from  these  two  sources  together  with 
additional  remarks  by  the  authors  to  aid  in  the  understanding 
of  the  procedure . 

A.     Library  Tape  Format 

The  library  tape  is  composed  of  two  files,     The  first  file 
contains  three  records  in  absolute  binary  format ,     These  are: 

a .  Bootstrap  routine    (  BOOT  ) 

b .  Recovery  routine   (  EXTREC  ) 

c.  Master  Control  routine   (  MCS  ) 

The   second  file  contains  the   subroutine  library  and  starts 
with  the    "directory"  .     This  is  followed  by  the  library  subroutines 
each  consisting  of  one  record   (  the   system  can  accept  subroutines 
with  more  than  one  record  but  the  present  library  has  none  ) 
composed  of  contiguous  relocatable  binary  card  images.     Each 
subroutine  is  identified  and  defined  in  the  directory  by 
the  following. 
A  subroutine  name 

Number  of  records  in  the   subroutine  (  normally  1  ) 
Number  of  common  blocks  assigned 
Names  of  those  common  blocks 
Length  of  each  common  block 
Range  of  the   subroutine    (  FWA  and    LWA+1  ) 
Number  of  entry  points  to  the   subroutine 
Entry  point  names 

Number  of  external   symbols  referenced 
External   symbol  names 
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The  order  in  which  the   subroutines  are  identified  in  the 
directory  must  be  the   same  as  the  order  of  appearance  of  the 
subroutines  in  the  file.     The  identifying  name,    each  entry  point 
name ,    each  external  symbol  and  each  common  block  name  must 
have  the  following  properties: 

a.     Eight  BCD  characters  in  length,    no  imbedded  blanks 
bo     Leading  character  not  digital  or  blank,  except  common  block 

The  first  library  subroutine  defined  in  the  directory  is  the 
Master  Control  System  called  "Resident".     The  length  of 
Resident  and  all  named  entry  points  are  defined.     External 
references  are  not  made  within  the  resident  program,    There  are 
no  entries   in  the  directory  for  the   subroutine   EXTREC. 

The  recommended  layout  of  the  library   subroutine  file  is: 
1 .     Directory   (  this  must    be  first  ) 
2  o     I/O  drivers  for  standard  medium 

3,  All  other  I/O  drivers 

4 .  Secondary  Control  Systems   (  SCS  ) 
5  o     Any  other  subroutines 

6o     SNAP   (  selective  dump  routine) 

7.  MAP   (produces  a  memory  map  of  loaded  programs) 

8.  Systems   such  as  FORTRAN,  CODAP1 ,   ALGOL,    etc. 

This  layout  facilitates  one  pass  loading  of  library  subroutines. 
The   sequence  for  loading  library  subroutines  will  be: 

1.  I/O  drivers  for  the   standard  medium s» 

2.  I/O  drivers  for  the  current  job. 

3.  The  desired  secondary  control  system. 

B.     Directory  Format 

The  directory  is  a  set  of  8  different  types  of  cards  for  each 
subroutine  in  file  2  of  the  library  tape.  These  must  be  ordered 
in  the  directory  deck  in  the   same   sequence  as  the  routines  appear 
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where  000 

KKKKK 

RRRRR 


in  file  2<     Care  must  be  exercised  to  assure  the  directory 
reflects  the  exact  composition  of  the   subroutine  file,    otherwise 
errors  will  result „     Each  set  of  directory  cards  must  contain: 
1.     A  card  with  the   subroutine  name,    left-justitied,    in 
columns    1-8. 

2o     A  card  with  a   16  digit  octal    integer,    left-justified,    in 
columns   1-16.     This  has  the  format: 

000KKKKK000RRRRR 

is  zero 

is  the  number  of  common  blocks  required 

by  the   subroutine 

is  the  number  of  records  the   subroutine 

occupies  on  the  library  tape   (  usually   1  ) 

3.  If  KKKKK  is  not  zero,    there  must  be  a  number  of  cards 
equal  to  KKKKK  containing  the  name  of  each  common  block. 
The  name  is  punched,    left-justified,    in  columns    1-8.  The 
card  may  be  blank  if  no  name  for  the  common  block  is  given. 

4.  If  KKKKK  is  not  zero,    there  must  be  a  number  of  cards 
required  to  define  the  lengths  of  the  common  blocks.     These 
cards  contain  octal     integers   separated  by  commas »     The  integers 
specify  the  length  of  the  common  blocks  named  by  the  cards 

in  #3  and  the  lengths  must  be  in  the   same   sequence  as  the 
names.     Any  number  of  integers,    more  than  zero  may  appear 
on  a   single  card.     The  last  integer  on  the  card  must  be 
followed  by  a  blank  „     The  number  of  cards  required  depends 
on  the  number  of  common  blocks  and  the  packing  of  lengths. 

5.  A  card  with  a   16  digit  octal    integer,    left-justified,    in 
columns   1-16.     This  has  the  format: 

PPPFFFFFXXXLLLLL 
is  the  number  of  entry  points  to  the   sub- 
routine   (  must  not  be  zero  ) 
is  the  relative  first  word  address  of  the   sub- 
routine   (  FWA  ) 


where  PPP 


FFFFF 
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XXX  is  the  number  of  external  symbols  referenced 

by  the   subroutine 
LLLLL        is  the  relative  last  word  address  plus   1 

of  the   subroutine    (  LWA+1  ) 

6.  The  number  of  cards  equal  to  PPP,    each  containing  an 
entry  point  name,    left-justified,    in  columns   1-8       There  must 
be  at  least  one   such  name. 

7 .  The  number  of  cards  required  to  define  the  entry  point 
addresses.     These  cards  contain  octal     integers  of   1  to  5 
digits   separated  by  commas.     The  integers   specify  the 
relative  address  of  the  entry  points  named  on  the  cards  in  6. 
The  entry  point  addresses  must  be  in  the   same   sequence  as 
their  corresponding  entry  point  names. 

8.  The  number  of  cards  equal  to  XXX  in    5.     If  this  is  greater 
than  zero,    each  card  just  contains  the  external  symbol  name, 
left-justified,    in  columns   1-8 „     These  external  symbol  names 
must  be  in  the   same  order  as  they  were  defined  during  the 
assembly  or  compilation  of  the   subroutine. 

The  sets  of  directory  cards  are  preceded  by  a  card  with 
"DIRECTRY"  punched  in  columns  1-8  and  followed  by  a  card 
with    "7777777777777777"  punched  in  columns    1-16. 

C.     Edit  Input 

The  input  data  for  editing  a  library  tape  is  composed  of  control 
cards,    directory  cards,    and  program  information.     The  program 
information  is  in  the  form  of  relocatable  binary  cards  and  this 
binary  format  must  be  thoroughly  understood  by  the  user  to 
perform  a   successful  LIBEDIT.     Appendix  III  of  refo10  gives 
a  complete  description  of  this  binary  card  format,, 

The  input  data  must  be  on  the  standard  input  unit  along 
with  the  required  MCS  control  information  (  "begin  job"  and 
"mcs"   cards).     The  next  card  of  the  edit  input  deck  must 
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LIBEDIT  INPUT  DECK 


/  /  / 


J        END  MONITOR  INPUT 
END  OF  FILE 
END  Card 


Last  Subroutine  in  File  2 


Second  Subroutine  in  File  2 


First  Subroutine   in  File  2 
7777777777777777   Card 


Directory  Deck 
DIRECTRY  Card 

File   1   Records   (  If  Required  ) 
START  Card 
MCS  Control  Card 
BEGIN  JOB  XXX  Card 


Figure  Ac 2     Edit   Input  Deck 
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be  a  START  card.     This  card  contains  the  word  "START"  in 
columns   10-14  to  produce  a  library  tape  of  the   same  format 
as  the  old,    see  ref.17  for  other  formats  possible,,     The 
succeeding  cards  in  the  input  deck  are  determined  by  the  type 
of  edit  and  the  file  of  the  library  affected, 

D.     File    1   Edit 

The  information  in  file   1   is  in  absolute    binary  format,    and 
the  file  is   divided  into  three  records.     Each  record  must  be 
added,   replaced  or  deleted  as  an  entity .     The  information  to 
be  added  or  replaced  must  have  been  prepared  by  CODAP1 
using  the  ORG  pseudo  instruction  and  it  must  be  a  complete, 
absolute  binary  format  program.     The  complete  deck  produced  by 
CODAP1   is  included   (  only  the    "begin  job"   card  need  be  removed) 

The  edit  input  is  composed  of  decks  of  absolute    binary 
records,    each  preceded  by  a  control  card.     This  card  contains 
a  decimal  integer  in  column   10,   followed  by  a  blank,  R,  or  D. 
The  integer  specifies  the  record  position  within  file   1   of  the 
binary  card  images  which  follow.     The  blank   specifies  the  record 
is  to  be  added,    R  to  replace,  and  D  to  delete.     The  decks 
composing  the  records  must  appear  in  the   same  order  in  which 
they  will  appear  on  the  new  library  tape . 

If  any  of  the  entry  points  in  MCS  are  altered  by  this  edit 
then  the  complete    directory   (  with  the  new  MCS  entry  point 
addresses  )    must  be  included  in  the  edit  input. 

The  Extended  Recovery  routine    (  EXTREC  )    uses  the  AET  and 
flags  contained  in  BOOT  as  absolute  address   locations.     If 
these  locations  are  changed,    then  they  must  be  changed  within 
EXTREC  (  by  recompiling  )  and  including  the  new  EXTREC  deck, 
between  BOOT  and  MCS,  in  the  file   1   edit. 
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E.  File   2    Edit 

The   information  in  file   2   is   in   several  records   in 
relocatable  binary  format.     The  first  record  is  the  directory. 
A  new  version  of  the  directory  need  not  be  included  in  the 
edit  input  deck  when  the  changes  to  file  2   are  replacements 
which  do  not  affect  record  lengths   or  entry  points.     In  all 
other  cases  the  complete  directory  must  be  included. 

The  first  record  of  each  subroutine    (  normally  there  is  only 
one  record  )    must  be  composed  of  relocatable    binary  card 
images  produced  by  CODAP1 .     For  edits  involving   subroutines 
of  more  than  one  record  see  ref.17.     Each  record  must  be 
preceded  by  a  control  card  containing  the   subroutine  name, 
left-justified,    in  columns    1-8,  a  blank  in  column  9,  and  a 
decimal  integer  starting  in  column  10  followed  by  a  blank,  R, 
or  D.     This  integer   specifies  the  position  of  this  record 
within  the  records  of  this   subroutine  (  usually   1  ) .     The  blank 
specifies  that  the  record  is  to  be  added;  R  specifies  it  is  to 
replace  an  existing  one,    D  specifies  it  is  to  be  deleted.     If 
a  D  appears ,    a  binary  deck  for  that  record  must  not  appear 
in  the  edit  deck . 

The  edit  deck,    see  figure  A. 2,  must  be  terminated  by  a 
card  with  the  word  END  in  columns   10-12.     To  finish  the 
input  job  an   "END  OF  FILE"    and  a    "END  MONITOR  INPUT" 
are  necessary. 

F.  Operation 

The  library  edit  program  is  called  from  the  library  as  the 
Secondary  Control  System  by  a  MCS  control  card.     The  edit 
input  is  read  from  the   standard  input  unit;   a  new  library  tape 
is  written  on  the  logical  unit  #13;  operating  information  is 
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written  on  the   standard  output  unit  and  the  comment  to 

operator  unit. 

For  an  edit  operation  the  MCS  control  record  (  card  ) 

might  appear:      7 

'ELT,MGH,  34000 ,0/13,5 ,1000. 

During  operation  of  the  program,    a  listing  is  produced 
on  the   standard  output  unit.     This   listing  contains  each 
control  card  as  it  appears  in  the  edit  deck,    all  directory 
cards,    and  a  message  PREV  REC  X  for  each  record   transferred 
from  the  existing  library  to  the  new  tape^     The  completion 
of  the  operation  is  indicated  by  the  message  EDIT  COMPLETED, 
A  sample   edit   listing   is    shown  is   figure  A.l.     Error 
diagnostics  are  written  on  the   standard  output  unit  and  the 
comment  to  operator  medium  as  errors  are  detected,     These 
diagnostics  are  explained  in  table   1 . 
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START 

MONITOR  RUN. 

BEGIN 

JOB   234 

ELT,  222, MGH, 0/13,5,1000 

START 

1R 

PREV. 

2 

3R 

DIRECTRY 

RESIDENT 

0000000000000000 

0430007700014557 

READ* 

WRITE* 

SELECT* 

0 

• 

1205 

1212 

655 

• 

TYPEI/O 

0000000000000000 

0010000000300277 

TYPEI/O 

0 

CBF1* 

CBF2* 

SELECT* 

CARDREAD 

0000000000000001 

0010000000200466 

• 

WRITE* 

LOADER* 

7777777777777777 

PREV. 

TYPEI/O          1 

CARDREAD     1R 

PREV. 

PTI                    1 

PREV. 

PTLOG             1 

PREV, 

BFT                   1 

• 

PREV. 

MAP                  1 

PREV. 

LIBEDIT          1 

PREV. 

COPY*             1 

EDIT  ( 

COMPLETED 

Figure  A.  1 

Sample   Edit   Listing 


88 


TABLE    1    LIBRARY  EDIT  ERROR  DIAGNOSTICS 

CKSUM   ERROR  XXXXXXXX  LTN-50 

An  input  column  binary  card  checksum  detected  to  be  in 
error.     XXXXXXXX  will  be  the  record  number  if  the  error  is 
detected  during  a  file   1   edit;  or  it  will  be  the  name  of  the 
subroutine  if    the  error  is  detected  during  a  file  2   edit. 

DIRECTRY  ERROR 

An  error  has  occurred  in  the  directory. 

DIROFLO   ERROR  XXXXXXXX 

One  of  the  eight  directory  tables  requires  more  than   1/8 
of  available  core .     XXXXXXXX  will  be  the  name  of  the  routine . 

EDITINP  ERROR  XXXXXXXX 

The  order  of  the  attempted  edit  is  incorrect  or  incompatible 
with  the  directory.     XXXXXXXX  will  be  the  name  of  the  routine. 

END  OF   TAPE 

An  end  of  tape  mark  is  encountered  during  writing  of 
the  new  library  tape. 

EPT  ERROR 

Two  routines  in  the  directory  have  the   same  entry  point 
names. 

OFLCORE  ERROR  XXXXXXXX 

Available  core  is  not  large  enough  to  allow  forming  a 
record.     XXXXXXXX  will  be  the  record  number  if  the  error 
occurs  during  a  file   1   edit;   or  it  will  be  the  name  of  the 
routine  if  the  error  occurs  during  a  file  2   edit 

RANGE  ERROR  XXXXXXXX 

An  inconsistency  exists  between  the  IDG  and  RBD  cards 
of  a  file  2   binary  deck.     XXXXXXXX  will  be  the  name  of 
the  routine . 
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READING   ERROR  XXXXXXXX  LTN-YY 

A.  A  persistent   (  not  cleared  after  three  tries  )    parity 
error  or  illegal  BCD  character  is  encountered  when  reading 
the  library  tape  or  the   standard  input  unit. 

B.  An  illegal  or  impossible  number  is  detected  on  an 
edit  control  card.     XXXXXXXX  will  be  the  record  number  if 
the  error  is  detected  during  a  file    1   edit;   or  it  will  be  the 
name  of  the  routine  if  the  error  is  detected  during  a  file 

2   edit. 

YY  will  be  the  number  of  the  logical  unit  number  on 
which  the  error  was  detected.     00  for  the  library  or  50 
for  the   standard  input  unit. 

WRITING   ERROR  XXXXXXXX  LTN-13 

A  persistent   (  not  cleared  after  three  tries  )  parity  error 
is  encountered  when  writing  the  new  library  tape .     XXXXXXXX 
will  be  the  number  of  the  record  if  the  error  is  detected 
during  a  file   1   edit;  or  it  will  be  the  name  of  the  routine 
if  the.  error  is  detected  during  a  file  2   edit. 
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ENCLOSURES 


ENCLOSURE   1 

A.  IDENTIFICATION 

TITLE:     160  Graf  plot  Routine 
PROGRAMMERS:   R.L.  HOGG/D.C.  GLOVER 
ORGANIZATION:   U.S.    Naval  Postgraduate  School 

Monterey,    California 
DATE:    1  April   1963 

B .  PURPOSE 

To  plot  multiple  curved  graphs  on  the  CalComp  165   plotter. 
Graph  titling  and  axes  annotation  are  provided.     The  input 
to  the  routine  is  a  specially  prepared  magnetic  tape,    see 
the  CDC   160-A  program  of  the   same  name  for  the  input  tape 
format.     This  routine  is  a  truncated  version  of  the   160-A 
program,    interpolation  has  been  deleted  in  order  to  operate 
in  the  reduced  memory  of  the   160   computer. 

C .  USAGE 

1 .     Normal  Operation 

a.  Load  the   specially  prepared  magnetic  tape  input 
(See   160-A  write-up)    on  unit  #1  „     Select  unit 
for  Binary  parity. 

b.  Load  bi-octal  grafplot  program  at  address  0000. 

c.  Position  the  plotter  pen  at  position  where  the 
lower  left  corner  of  the  graph  is  to  be  plotted. 


d.     Starting  Addresses 


Location 

Contents  of  "A" 

#  of  graphs  to 
be  plotted 

Results 

0000 

Reads  tape  and  plots 
#  of  graphs  called  for. 
If  A=0  ,  all  graphs  will 
be  processed. 

0001 

Skip  to  next  graph  . 

0002 

Backspace  to  beginning 
of  current  graph. 

0003 

Back-up  one  graph. 

0004 

Same  as  a  0000  start. 

0010 

Rewind  tape  to  Load  Pt„ 

0040 

Graph  #  in  A 

Skips  forward  N-l  graphs, 
into  position  to  plot 
graph  #N„ 

Optional  Running   Modes 

Four  modes  of  operation  are  provided „    To  select  the  mode 
desired,    execute  a  start  at  cell  0020  with  the  following 
"A"  register  arguments   set.     This  primes  the  routine  for 
the  mode   selected.     Remaining  graphs  will  be  plotted  in 
this  mode,  operations  as  previously  described „ 

"A"   REGISTER  FORMAT  for  MODE  SELECTION 


0       0 


\ Stop  after 

each  curve 
—Bypass 
Titling 
I — Bypass 

Axes   Labeling 
ypass 

Axes  &   Labeling 


NOTE:     Entry  of  any  non-zero  octal  number, 
constitutes   setting  an  argument, 


fo     Normal   Stops 
Location 
0004 

1157 


Situation 


Normal  halt  after  operation 
is  completed 

Optional  halt  after  each  curve 
Run  to  continue 


Error  Stops 

0130 

0135 

0173 

0200 

0373 

0400 

1125 

1163 


*Parity  -  Title  location  data 
** 

*Parity  -  Title  character 
** 

*Parity  -  Axed  data 
** 

*Parity  -  Curve  data 
** 


*    Re-Select  Start  to  continue  questionable  ploto 

**  Unable  to  Continue  /  Skip  to  next  graph  to  proceed 


ENCLOSURE   2  DATA  CENTERS   IDENT:      *B0Q1. 

■ 

A.  IDENTIFICATION 

TITLE:   160-A  Graph  Plot  Program 

DATA  CENTERS  IDENT:   *B001. 

PROGRAMMERS:  Maurice  D.  Weir,  Milton  Spritzer,  D.  W.  Mcllhenny, 
Harry  Farnsworth 

ORGANIZATION:   Fleet  Numerical  Weather  Facility,  Monterey,  California 

DATE:   15  August  1962 

REVISED:   4  February  1963,  by  R.  Hogg  and  D.  Glover 

B.  PURPOSE 

To  plot  N  curves  on  the  CONTROL  DATA  165  Plotter,  complete  with  titling 
information  and  annotated  axes,  from  a  specially  prepared  magnetic  tape. 
SEE  TAPE  FORMAT. 

C.  USAGE 

1.  Computer  Operational  Procedure 
a.  Normal  operation: 

1)  Specially  prepared  magnetic  tape  on  Unit  #1.   (SEE  TAPE  FORMAT) 

2)  Load  bi-octal  tape  at  location  0,  bank  0.   Set  direct  bank 
equal  to  zero. 

3)  Position  the  plotter  pen  such  that  the  cross -hairs  line  up  in 
the  following  INITIAL  POSITION:   LEFT  most  VERTICAL  LINE  and  one 
of  the  HALF-INCH  HORIZONTAL  LINES  on  the  graph  paper. 

CAUTION:   User  should  indicate  this  POSITION  in  relation  to  a 
previously  plotted  graph.   This  prevents  the  forth- 
coming graph  from  being  written  over  a  previously 
plotted  one. 

4)  Starting  Address 

Location     Contents  of  A     Result 

0000       No.  of  graphs     Reads  tape  and  plots  number  of 
to  be  plotted.    graphs  called  for.   If  A  =»  0, 

tape  will  be  completely  processed. 
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Location 
0001 
0002 


Contents  of  A 


Result 

Skip  to  next  file. 

Backspace  to  beginning  of 
current  graph. 


0003  Back  up  one  complete  graph. 

0010  Rewind  tape  to  load  point. 

0040       Graph  No.  N       Skip  N-l  graphs,  and  stop 
NOTE:    Normal  halt  for  above  operations  is  location  4. 

5)  Plotter  pen  will  position  itself,  draw  and  annotate  the 
horizontal  and  vertical  axes.   Pen  will  finish  by  driving 
back  such  that  the  cross -hairs  are  now  lined  up  with  the 
INTERSECTION  of  the  HORIZONTAL  and  VERTICAL  AXES  just  drawn. 

6)  Plotter  will  plot  N  curves  with  their  identification  (if  any). 
Pen  will  finish  by  driving  back  to  the  INTERSECTION  of  the 
HORIZONTAL  and  VERTICAL  AXES. 

7)  Normal  Stop 

(P)  =  0004  -  Normal  halt  for  all  options. 

8)  Error  Stops 

a.)     The  following  error  stops,  which  occur  during  the  read  from 
the  magnetic  tape,  have  two  options.   These  options  are: 

I)  RUN  for  questionalbe  plot,  or 

II)  SET  selective  jump  switch  #2  and  RUN.   This  will  result 
in  by-passing  that  particular  section  of  the  program 
(e.g.,  titling,  annotation  of  axes,  or  curve). 

The  error  stops  are: 

P  =  0135  -  Parity  error  in  title  locations 

P  =  0176  -  Parity  error  In  titling  data 

P  ■  0401  -  Parity  error  in  axes  data 

P  «  1144  -  Parity  error  in  curve  data 
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b)  The  following  error  stops,  which  occur  during  the  read  from 
the  magnetic  tape,  have  no  options.   If  any  occur,  operator 
should  check  to  make  certain  magnetic  tape  unit  is  on  unit 
#1,  tape  is  at  load  point,  tape  is  ready,  163-2  units  are  on. 
Then  set  (P)  according  to  step  4). 

The  error  stops  in  this  category  are: 
P  -  0142  -  titling  location 
P  =  0203  -  titling  data 
P  ■  0406  -  Axes  data 
P  =  1200  -  curve  data 

-  1103  -  error  in  number  of  interpolations.   RUN. 

b.   Operational  variations: 

The  Graph  Plot  program  contains  some  special  operational  procedures 
which  allow  for  variations  in  the  graph  by  altering  the  Normal 
operation. 

1)  Option  to  by-pass  titling: 

After  the  plotter  pen  has  been  positioned  in  the  previously 
defined  INITIAL  POSITION,  SET  selective  jump  switch  #2.   Set 
(P)  according  to  step  a. 4)  and  RUN.   Titles  will  be  read  from 
magnetic  tape  but  not  plotted.   Program  will  make  NORMAL  STOP/ 
P  =  0361,  and  pen  will  not  have  moved. 

2)  Option  to  by-pass  axes  annotation: 

With  plotter  pen  at  AXES  INTERSECTION  and  at  SPECIAL  STOP 
P  »  0361,  SET  selective  jump  switch  #2  and  RUN  (do  not  clear). 
Axes  data  will  be  read  from  magnetic  tape  but  not  plotted. 
Program  will  make  NORMAL  STOP  P  «  1051,  and  pen  will  not  have 
moved. 

3)  Option  to  PLOT  -  one -curve -STOP: 

With  plotter  pen  at  AXES  INTERSECTION  and  at  SPECIAL  STOP 

P  =  1051,  SET  selective  stop  switch  #1  and  RUN.  After  curve 

is  plotted,  pen  will  drive  back  to  AXES  INTERSECTION,  and  program 

will  make  SPECIAL  STOP  P  ■  1174  before  the  next  curve  record  is 

read  in.  Pen-ink  may  now  be  changed  for  next  curve,  etc.  RUN 

to  read  in  and  plot  next  curve* 
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4)  Option  to  by-pass  one  curve  at  a  time: 

At  SPECIAL  STOP  P  «  105*^,  SET  selective  >ump  switch  #2 
and  RUN.   Curve  data  v/ill  be  read  in,  and /program  will  make 
SPECIAL  STOP  P  =  436/.   If  selective  jutm/  switch  #  2  remains 
set  when  RUN  Is  set,  next  curve  will  be'read  in,  and  program 
will  again  make  SPECIAL  STOP  P  ■  *&&s(    If  selective  jump 
switch  #  2  is  not  set  when  RUN  is  set,  next  curve  will  be 
read  in  and  plotted,  etc. 

2.   Space  Requirements 

a.  Program:  0  -  4137  in  Bank  zero. 

b.  Curve  data  and  interpolation:  100  -  7777  in  Bank  one. 
31  Temporary  Storage 

Locations  50  -  77  in  Bank  zero. 

4.  Tape  Mountings 

Magnetic  tape  must  be  read  from  unit  #  1. 

5.  Caution  to  Users 

Do  not  step  through  program.  Read  write-up  carefully  before  using 
the  Graph  Plot  Program. 

D.  .  TAPE  FORMAT  , 

Each  magnetic  tape  to  be  used  by  this  program  must  have  one  ot  more 
records  (as  indicated)  in  each  of  the  following  categories: 

I  Titling  data  -  multiple  records 

II  Axes  data  -  one  record 

III  Curve  data  -  multiple  records 

IV  End  of  File. 

These  records  must  be  on  the  magnetic  tape  in  the  order  defined  above  and  in 
the  format  to  be  specified  below. 
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AXES  DEFINED  AS  FOLLOWS: 


I 


+  J 


-*-    +  1 


I  ■  horizontal  axis 


J  ■  vertical  axis 


y 
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I   Titling  data 
1.  Record  0 


a.  12  bit  binary  mode 

b.  4  160-A  words  (i.e.,  1  1604  word) 
e.  Format! 


word  0 


word  1 
<JT) 


word  2 


I  distance  of  initial  pt.  of  first  title 

from  the  INITIAL  POSITION,  given  as 

a  signed  A  I  movement  in  inches  times 

100,. 
d 

J  distance  of  initial  pt.  of  first  title 
from  the  INITIAL  POSITION,  given  as  a 
signed  £* J  movement  in  inches  times 

100  J. 

d 

Orientation  of  titles  defined  as  follows; 


0004 


0001 


Ll 

z 


.  FNWF 


word  3 


2.     Records   1  to  T 


0002 


0003 


dMNJ 


Number  of  lines  in  title  given  as  a  12 
bit  integer.  (Octau") 


a.  BCD  characters  in  6-bit  binary  mode. 

b.  Maximum  length  of  120  characters  where  119  is  number 
of  characters  to  be  plotted. 


c.  Format: 


character  0 


Size  of  letters  in  title  line.   Size  X  is 
defined  to  be  "X  times  one-tenth  inch". 
The  width  of  a  letter  is  approximately 
equal  to  its  height. 
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character  1 


Title  line  in  BCD. 
fill  out  this  line 


Not  necessary  to 


character  119 


II  Axes  data 


a.   1  record  In  12  bit  binary  mode 


b.  20.  160-A  words 

d 

c.  Format: 


w^)° 


word  1 

<V 


word  2 


word  3 


word  4 


T  distance  of  initial  point  of  horizontal  axis 

from  the  INITIAL  POSITION,  given  as  a  signed 

AI  movement  in  inches  times  100,. 

d 

J  distance  of  initial  point  of  horizontal  axis 

from  the  INITIAL  POSITION,  given  as  a  signed 

A  J  movement  in  inches  times  100, . 

d 

Length  of  the  horizontal  axis  given  as  a  signed 

£J  movement  from  where  the  axis  begins  in  inches 

times  100,. 
d 

I  distance  of  initial  point  of  first  horizontal  axis 

label  from  the  INITIAL  POSITION,  given  as  a 

signed  A I  movement  in  inches  times  100,. 

d 

J  distance  of  initial  point  of  first  horizontal 
axis  label  from  the  INITIAL  POSITION,  given  as 
a  signed  A  J  movement  in  inches  times  100  . 


word  5 

<W 

word  6 

<V 


I  distance  between  horizontal  labels,  given 

as  a  signed  A I  movement  in  inches  times  100,. 

d 

First  value  which  is  to  be  plotted  for  the  hori« 
zontal  axis  labeling.   This  is  a  signed  12  bit 
integer  which  will  be  converted  to  BCD.   Its 
maximum  value  cannot  exceed  +999,. 


word  7 

<V 

word  8 

<V 


Value  of  the  £  I  distance  between  horizontal 
axis  labels  given  as  a  signed  12  bit  Integer. 

Number  of  horizontal  axis  labels  to  be  plotted. 
This  is  always  a  positive  12  bit  integer. 
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word  9 

<V 


Upper  six  bits:   Size  of  letters  in  horizontal 
axis  labeling. 

Lower  six  bits:   Orientation  of  horizontal  axis 
labels.   Orientation  previously  defined. 


word  10 


word  11 

<y 

word  12 

<V 

word  13 

<V 

word  14 

<V 

word  15 
<JVL> 

word   16 

<V 

word  17 

<  V 

word  18 

<V 

word  19 

<V 


I  distance  of  initial  point  of  vertical  axis  from 

the  INITIAL  POSITION,  given  as  a  signed  *I 

movement  in  inches  times  100,. 

d 

Vertical  axis  analogy  to  word  1. 


Vertical  axis  analogy  to  word  2. 


Vertical  axis  analogy  to  word  3. 


Vertical  axis  analogy  to  word  4 


Vertical  axis  analogy  to  word  5 


Vertical  axis  analogy  to  word  6, 


Vertical  axis  analogy  to  word  7, 


Vertical  axis  analogy  to  word  8, 


Upper  six  bits:   Size  of  letters  in  vertical 
axis  labeling. 

Lower  six  bits:  Orientation  of  vertical  axis 
labels . 


Ill  Curve  data 

a.  Multiple  records  in  12  bit  binary  mode. 

b.  m  words  long  where  m  has  maximum  value  of  3677  . 

o 

c.  Each  I,  J  must  be  given  as  a  distance  from  the  INITIAL  POSITION, 
as  a  signed  £^I,AJ  movement  in  inches  times  100  . 
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d. 

Format: 

word  0 

0000 

word  1 

0000 

word  2 

0000 

word  3 

number  of  interpolations  (00 

word  4 

1 

word  5 

word  6 

word  7 

-  07) 


word  m-5 
word  m-4 
word  m-3 
word  m-2 
word  m-1 


3777   end  flag 
3777   end  flag 

curve  name.   4  BCD  characters, 

packed  two  to  a  word. 
upper  six  bits;  letter  size  of  curve  name 
lower  six  bits:  orientation  of  curve  name 


IV   End  of  File 


E.   TIMING 


Each  graph  takes  2 
and  interpolation. 


-  3  minutes  to  plot,  including  titling,  annotated  axes, 


F.  METHOD 


1.  General 

All  location  points  on  the  graph  are  interpreted  as  being  relative 
to  the  (0,  0)  INITIAL  POSITION  previously  defined.   All  lengths, 
intervals,  etc.  must  have  the  appropriate  sign  according  to  the 
definition  of  the (I,  J)  axes.   Intormation  is  plotted  as  follows: 
titles,  horizontal  axis,  horizontal  axis  annotation,  vertical  axis, 
vertical  axis  annotation,  and  finally  the  curve (s)  (with  interpo- 
^    lations,  if  any).   The  program  uses  TAP  for  reading  the  magnetic 
tape  input,  OVDR  for  driving  to  a  position  with  the  pen  up,  LINE 
for  joining  given  points  with  the  pen  down,  and  LABEL  for  titling. 

2.  Titles 

The  initial  points  from  the  magnetic  tape  input  are  used  to  position 
the  pen  in  the  desired  location  on  the  graph  for  the  first  title.  The 
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first  title  is  plotted,  and  if  there  are  additional  titles,  the  program 
calculates  the  appropriate  spacing  between  lines  according  to  the 
orientation  and  the  letter  size  of  the  incoming  title.  The  program 
keeps  track  of  all  pen  movements  so  that  when  the  last  title  is 
plotted,  pen  drives  back  to  the  (0,  0)  INITIAL  POSITION. 

3.  Annotation  of  Axes 

The  initial  points  from  the  magnetic  tape  input  are  used  to  position 
the  pen  in  the  desired  location  on  the  graph  for  the  start  of  the 
horizontal  axis.   The  axis  is  drawn,  and  then  the  pen  moves  into 
position  to  begin  the  first  horizontal  axis  label.   This  first  label 
is  plotted  according  to  its  size  and  orientation;  the  remaining  labels 
being  computed  and  then  plotted  at  the  desired  intervals,  based 
upon  the  initial  value,  the  scaling,  and  the  number  of  labels  de- 
sired.  At  the  completion  of  the  horizontal  axis  annotation,  the  pen 
positions  itself  at  the  start  of  the  vertical  axis.  The  axis  is  drawn 
and  labelled  as  in  the  horizontal  axis  annotation.  The  program 
keeps  track  of  all  pen  movements  so  that  when  the  vertical  axis 
annotation  has  been  completed,  pen  drives  back  to  the  INTERSECTION 
of  the  HORIZONTAL  and  VERTICAL  AXES. 

4.  Interpol ition 

This  is  a  four-point  interpolation  method  based  on  the  Bessel  In- 
terpolation Equations. 


unit 
interval 

The  interpolation  scheme  fits  the  four  points  to  a  quadratic  curve, 

computing  the  interpolated  point  J  by  the  following  equation: 

F 


Jp  -  J1   +  F  (J2  -  Jx)  +  F  (F  -  1) 

4 

The  program  uses  F  ■  1/2. 


<J0  +  J3  '  J2  -  V 
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This  interpolation  method  depends  upon  equal  I  intervals.   Since 
it  cannot  perforin  an  interpolation  between  the  first  and  last  pairs 
of  J  values,  a  linear  interpolation  is  performed  at  these  two  posi- 
tions (marked  "L"  in  the  diagram).   This  linear  interpolation  oc- 
curs at  the  half -interval  of  both  end  pairs,  which  allows  the  user 
to  make  more  than  one  interpolation  by  maintaining  equality  of  I 
Intervals . 

The  number  of  interpolations  X  desired  must  comply  with  the  follow- 
ing inequality:  \ 

2*    too 

The  program  has  set  the  maximum  number  of  interpolations  as  07, 
If  the  number  of  interpolations  indicated  (see  TAPE  FORMAT,  "curve 
data")  exceeds  this  maximum,  program  will  interpolate  07  times 
only,  and  indicate  an  error  in  the  number  of  interpolations  indicated. 

Caution:   Because  of  the  necessary  storage  space  for  the  curve  data 
points,  the  maximum  number  of  (I,  J)  points  that  can  be  plotted 
after  interpolation  is  980,. 

WARNING :   Since  the  interpolation  depends  upon  equal  spacing  of 
the  I  intervals,  any  curve  which  does  not  have  equally  spaced  points 
will  not  be  properly  interpolated.  This  applies  to  multiple-valued 
functions  and  asymptotic  values. 


5.  Curves 


The'  first  (  I,  J  )  curve  data  point  from  the  magnetic  tape  input  is 
used  to  position  the  pen  in  the  desired  location  on  the  graph  for 
the  start  of  the  curve  plot.  Curve  is  then  plotted  by  joining  suc- 
cessive points  by  a  straight  line.   At  the  completion  of  plotting 
the  curve  (with  the  desired  number  of  interpolations,  if  any), 
program  labels  curve  (if  desired)  with  indicated  orientation  and 
letter  size.  Program  keeps  track  of  all  pen  movements  so  that 
when  the  curve  labelling  is  completed,  pen  drives  back  to  the 
INTERSECTION  of  the  HORIZONTAL  and  VERTICAL  AXES.   If  another 
curve  is  to  be  plotted,  program  proceeds  in  the  same  manner  as 
for  the  first  curve.  When  the  final  curve  is  plotted,  pen  will  be 
positioned  at  the  INTERSECTION  of  the  HORIZONTAL  and  VERTICAL 
AXES, 

Caution:  User  may  not  desire  a  curve  label,  in  which  case  blanks 
are  indicated  on  the  magnetic  tape  for  the  four  BCD  characters. 
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(see  TAPE  FORMAT,  "curve  data.")  ftJeyfirtheless,  an  orientation 
and  letter  size  must  still  be  Indicated  since  they  are  required 
by  the  LABEL  subroutine. 


FINIS 
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EXCLOSURE    3 


-  DATA  CENTERS   IDENT:      *A002. 


A.  IDENTIFICATION 

TITLE:   1604  Graph  Plotting  Subroutine 

DATA  CENTERS  IDENT:   *A002. 

PROGRAMMERS:   R.  L.  Hogg  and  D.  C.  Glover 

ORGANIZATION:  Naval  Postgraduate  School,  Monterey,  California 

DESCRIPTION  WRITE-UP:   E.  A.  Campbell,  CDC 

DATE:   5  March  1963 

B.  PURPOSE 

To  write  data  on  a  magnetic  tape  for  off-line  plotting  on  the  CONTROL  DATA 
165  plotter.  The  tape  format  is  compatible  with  the  160-A  Graph  Plot 
Program  (Data  Centers  Ident  *B001.)  which  is  used  to  drive  the  165  plotter. 

C.  USAGE 

1.  Calling  Sequence 

a.  FORTRAN-62 

CALL  GRAFPL0T(M0DCURV,  NUMPTS,  X,  Y,  LABEL,  INTERPS,  SFX,  SFY,  IXOFFS,  IYOFFS, 
IWIDE,   IHIGH,  MODE,  TITLESIZ,  TITLEl,  TITLE2,  ,  TITLEN) 


CALL  AUTOGRAF(MODCURV,  NUMPTS,  X,  Y,  TITLEl,  TITLE2, 
TITLEN) 


^b, 


C0DAP1 

Either: 

ENA 

(MODCURV) 

ENQ 

(NUMPTS) 

RTJ 

GRAFPLOT 

+ 

ZRO 

X 

"  ZRO 

Y  , 

ZRO 

LABEL 

ZRO 

INTERPS 

ZRO 

SFX 

ZRO 

SFY 

ZRO 

IXOFFS 

ZRO 

IYOFFS 

ZRO 

IWIDE 

ZRO 

IHIGH 

- 

ZRO 

MODE 

ZRO 

TITLESIZ 

ZRO 

TITLEl 

ZRO 

TITLE2 

ZRO 


TITLEN 
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Or: 


ENA 

(MODCURV) 

ENQ 

(NUMPTS) 

RTJ 

AUTOGRAF 

ZRO 

X 

ZRO 

Y 

ZRO 

• 

TITLE 1 

• 
• 

ZRO 

TITLEN 

RTJ 

ERROR 

2.   Input  Parameters 


Parameter  Name 
♦MODCURV 


NUMPTS 
X 
Y 
LABEL 


INTERPS 

SFX 

SFY 

IXOFFS 
IYOFFS 

IWIDE 

IHIGH 


Value 

0 
1 
2 
3 
1-900 


4  BCD 

Char. 

0 

-0 

0 

1-7' 

0 
PI.  Pt. 
Number 

0 
PI.  Pt. 
Number 
1-10 

0 
1-10 

0 
1-10 
1-120 


Description 

First  and  last  curve  for  this  graph 

First  curve  of  many 

Intermediate  curve 

Final  curve  for  this  graph 

Number  of  points 

Location  of  X  coordinates 

Location  of  Y  coordinates 

BCD  label  for  curve 

No  label 

Automatic  sequencing  of  curves  fo* 

No.  1-8. 

No  interpolation  between  coordinate 

points 

One  to  7  interpolations  between 

coordinate  points 

Program  will  find  best  scale  factor 

Scale  factor  for  X  ** 

Program  will  find  best  scale  factor 

Scale  factor  for  Y  ** 

Number  of  inches  to  offset  X  axis 

No  offset 

Number  of  inches  to  offset  Y  axis 

No  offset 

Length  of  X  axis  -  inches 

Length  of  Y  axis  -  inches 


*If  MODCURV  is  2  or  3,  then  only  the  first  6  parameters  need  to  be  repeated. 

I 
t*Scale  factor  -  100 /units  per  inch  on  plotted  output. 
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Parameter  Name 
MODE 


TITLESIZ 


TITLE  1 


Value      Description 

0  Automatically  calculate  best  axes 
offset  for  origin  at  lower  left 

1  Locate  origin  at  center 

2  Locate  origin  at  lower  left 

3  Locate  origin  at  upper  left 

4  Locate  origin  at  upper  right 

5  Locate  origin  at  lower  right 
1-24      Multiplier  for  lettering  size. 

Basic  size  is  .1  inches. 
Location  of  first  title.   Title 
array  must  be  at  least  10  words  of 
BCD  characters.   Fill  unused 
characters  with  blanks. 


TITLEN 
3.   Space  Requirements 

1120  decimal  locations 
6.  Error  Returns 


Location  of  Nth  title  array 


No  error  return  is  used,  however,  an  error  return  point  is  skipped   / 
in  order  to  be  compatible  with  FORTRAN  subroutines. 

8.  Input/Output  Tape  Mountings 

i 
Plot  data  output  on  logical  48  through  CO-OP  Monitor. 

9.  Input/Output  Tape  Formats 

See  160-A  Graph  Plot  Program  write-up  for  details.   The  basic  form  is 
titling  information,  axes  annotation,  and  curve  data  with  an  end  of 
file  separating  graphs.   No  special  end  of  tape  mark  is  used  to 
terminate  the  tape. 

13.  Cautions  to  Users 

a.   If  scale  factors  are  defined,  then  the  appropriate  axes  offsets 
should  also  be  defined. 


b.   The  normal  width  of  the  plotter  paper  is  10  inches.   For  best 
results,  do  not  use  a  horizontal  axis  length  greater  than  9 
inches . 
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c.   The  number  of  interpolations  N  required  must  comply  with  the 
following  inequality:  Al/2  >  1/100  where  AI  is  the  uniform 
(equal)  increment  along  the  horizontal  axis.   See  reference 
for  further  details. 

14.  Equipment  Configuration 

CO-OP  Monitor  configuration  with  at  least  one  output  tape  available 

15.  References 

This  program  uses  160-A  Graph  Plot  Program  (Data  Centers  Ident  No. 
*B001)  as  a  subset  to  drive  the  165  plotter. 


/ 


